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Abstract 


A  microprocessor  based  DC  motor  speed  control  system  is 
presented,  incorporating  digital  proportional  and  integral 
control  schemes  in  the  system  software.  A  variable  duty 
cycle  SCE/dicde  bridge  is  used  to  provide  the  DC  controlling 
voltage  for  the  DC  motor  aramture.  PPM  feedback  is  provided 
by  a  shaft  mounted  slotted  disc  and  an  optical  interrupter 
circuit.  A,  current  to  voltage  transducer  and  an  A/D 
converter  circuit  allow  software  monitoring  of  the  armature 
current;  providing  instantaneous  and  Izt  current  limiting. 

A  keyboard  monitor  system  permits  the  modification  of 
motor  control  constants  and  set  points;  as  well  as  allowing 
the  user  to  enter  and  execute  assembly  language  programs. 

Binary  floating  point  addition,  subtraction, 
multiplication,  and  division  routines  are  included  in  the 
system  software  package.  These  routines  are  used  in  the 
implementation  of  the  motor  control  software,  as  well  as 
allowing  the  microprocessor  system  to  be  used  as  a  four 
function  calculator.  Floating  point  decimal  to  binary  and 
binary  to  decimal  conversion  routines  are  included  to  permit 
interfacing  between  the  system  and  its  human  operator. 

This  work  discusses  the  digital  control  algorithms 
used,  and  illustrates  the  motor's  response  to  step  load 
changes  and  BPM  setpoint  changes  with  various  combinations 
of  control  parameters.  The  hardware  and  software  of  which 
the  system  is  composed  is  also  discussed. 
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Introduction 


The  advent  of  microprocessor  technology  at  a  reasonable  cost 
has  opened  the  door  tc  many  dedicated  computer  control 
applications.  One  of  these  is  the  digital  control  of  a 
synchronous  generator  and  its  prime  mover.  Direct  digital 
control  of  a  static  excitation  system  allows  measures  to  be 
taken  to  counteract  system  instabilities  in  a  time  frame 
significantly  shorter  than  the  time  constant  of  the  prime 
mover.  The  ability  to  make  rapid  adjustments  of  the 
generator  output  allows  the  extension  of  the  stable 
operating  region  of  long  transmission  lines,  as  well  as 
permitting  the  damping  of  oscillations  on  intersystem  ties 
[1-8].  Many  methods  of  direct  excitation  control  have  been 
used,  with  varying  degrees  of  success  [9-24].  Today's 
availability  of  microprocessor  technology  has  added  another 
means  for  high  speed  excitation  control. 

The  general  optimal  solution  to  the  exciter  control 
problem  [25-28]  would  require  too  much  calculation  time  in  a 
normal  MOS  structure  microprocessor  configuration.  However, 
representing  the  generator  by  a  slightly  simplified 
mathematical  model,  results  in  a  set  of  equations  that  is 
close  enough  to  the  optimal  solution  for  all  practical 
purposes,  yet  is  simple  enough  for  real  time  calculation. 

The  functionality  of  this  model  has  been  verified  using 
computer  models  to  compare  the  simplified  model  to  a  more 
detailed  version  [29]. 
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A-  The  Scope  of  this  Thesis 

This  work  covers  the  design,  construction,  programming 
and  testing  of  a  digital  machine  control  development  system. 
The  system  is  configured  as  a  DC  motor  speed  controller,  nut 
is  designed  with  the  addition  of  excitation  control  in  mind. 
It  is  on  its  own  a  valuaile  tool  for  gaining  an 
understanding  of  digital  motor  control  and  some  of  the 
associated  considerations.  The  system  consists  of  the 
following  modules: 

1.  An  expandable  microcomputer  system  including  read  only 
memory  and  random  access  memory. 

2.  A  keyboard  and  display  to  allow  interaction  between  the 
operator  and  the  microcomputer  system. 

3.  An  interface  to  link  the  microcomputer  system  to  the 
application  module,  which  includes: 

a.  An  SCE  based  DC  voltage  source  suitable  for  the 
excitation  of  a  motor  armature  or  a  generator  field. 
The  duty  cycle  of  the  SCE  circuit  is  program 
controllable. 

b.  A  current  to  voltage  transducer  and  A/D  converter 
circuit  to  allow  the  microcomputer  to  read  the  motor 
armature  or  generator  field  current  produced  by  the 
SCE  circuit. 

c.  An  optical  tachometer;  consisting  of  a  shaft  mounted 
slotted  disc,  along  with  the  associated  electronics 
required  to  produce  latched  interrupts  as  the  disc 
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MICROPROCESSOR  BUS 


Figure  1  Block  Diagram  of  the  DC  ??otor  Speed  Controlle 

rotates, 

a,  A  zero  crossing  detector  circuit  which  produces  a 
synchronizing  pulse  each  time  a  voltage  zero  occurs 
on  the  120  volt  AC  source. 

4.  The  power  supplies  required  for  the  above  systems. 

5.  A  software  package  containing  the  following  modules: 


a. 


A  monitor  routine  to  allow  the  user  to  enter  and 
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execute  short  prograss,  manipulate  I/O  ports,  and 
control  the  operation  of  the  system. 

b.  A  binary  floating  point  arithmetic  package  which  can 
execute  a  multiplication  or  division  in 
approximately  one  millisecond.  Addition, 
subtraction,  and  conversion  between  floating  point 
decimal  and  floating  point  binary  numbers  are  also 
included. 

c.  A  set  of  routines  to  allow  the  microcomputer  system 
to  be  used  as  a  four  function  calculator;  the  main 
purpose  of  these  routines  being  to  permit  the  easy 
testing  of  the  above  arithmetic  package. 

d.  The  software  to  allow  the  various  hardware  modules 
to  be  used  as  a  DC  motor  speed  controller.  A 
proportional  plus  integral  control  algorithm  is 
implemented,  with  keyboard  alterable  gain  constants 
and  BPM  setpoint.  Instantaneous  current  limiting 
and  I2t  current  limiting  are  included  in  the 
software,  as  well  as  routines  to  display  parameters 
relevant  to  the  operation  of  the  control  program. 

Figure  1  illustrates  the  general  block  diagram  of  the 
system  configured  as  a  DC  motor  speed  controller. 
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II.  Digital  DC  Motor  Control 


Pigure  2  illustrates  the  implementation  of  the  system  as  a 
DC  motor  speed  control  device  [30-38].  The  digitized  shaft 
PPM  is  compared  to  a  setpoint  stored  in  memory.  This  error 
is  then  used  to  derive  a  proportional  control  value  and  an 
integral  control  value  using  binary  arithmetic.  These  two 
control  values  are  then  added;  and  the  resulting  digital 
value  is  converted  to  a  voltage  which  is  applied  to  the 
motor  armature.  The  feedback  path  consists  of  a  shaft 
mounted  slotted  disc  [34]  and  the  hardware  and  software 
required  to  convert  a  series  of  light  pulses  to  a  binary 
number  equal  to  the  angular  velocity  of  the  motor  shaft. 

The  goal  of  the  control  device  is  to  achieve  constant 
RPM  operation  cf  the  DC  motor  and  its  load.  The  response  of 
the  overall  system  can  readily  be  optimized  by  the 
modification  of  the  controller  gain  constants  and  the  sample 
interval. 
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Figure  2  DC  Motor  Control  Loop 

A.  The  Motor  Control  Algorithm 

The  motor  control  is  implemented  using  two  separate 
digital  control  algorithms  [39-40]:  a  proportional 
controller;  and  an  integral  controller.  The  sum  of  the 
outputs  of  the  two  controllers  is  then  used  to  generate  a 
motor  supply  voltage.  The  DC  motor  is  controlled  by 
applying  this  controlling  voltage  to  the  motor  armature. 
The  motor  field  current  is  maintained  at  a  constant  value, 
adjustable  by  a  series  resistor. 
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Digital  Proportional  Control 

The  proportional  control  output  is  given  by 

Cp  =  Kp(Fs-Ri) 

where  Cp  is  the  proportional  control  output;  Kp  is  the 
proportional  gain  constant;  Es  is  the  RPM  setpoint;  and  Ei 
is  the  present  instantaneous  RPM.  The  proportional  gain 
constant  and  the  RPM  setpoint  are  readily  modified  using  the 
system  keyboard. 

Digital  Integral  Control 

The  integral  control  output  is  calculated  using 

Ci  =  Cio  +  Ki  (Rs-Ri) 

where  Ci  is  the  new  integral  control  output;  Cio  is  the 
integral  control  output  calculated  at  the  previous  sample 
time;  and  Ki  is  the  integral  gain  constant.  When  this 
calculation  is  done  in  a  real  time  system,  a  further 
variable,  time,  is  introduced.  The  effective  equation  can 
then  be  expressed  as  follows: 

Ci  (t+dt)  =  Cio  (t)  +  Ks  (Rs-Ri)  dt 

Thus  the  integral  gain  in  practice  consists  of  the  product 
of  a  gain  or  slope  constant,  Ks,  which  determines  the  rate 
of  integration;  and  of  the  sample  interval,  dt.  Thus 

Ki  =  Ks«dt 

When  the  value  of  the  sample  interval  is  changed  to 
determine  its  effect  on  system  response,  the  value  of  Ki 
must  thus  also  be  altered  to  compensate  for  the  changed 
Ks«dt  product;  otherwise  a  consistent  comparison  will  not  be 
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made. 

A  digital  saturating  effect  (this  is  further  discussed 
in  the  next  chapter)  is  simulated  to  minimize  overshoot  and 
undershoot  resulting  from  an  excessive  magnitude  of  the 
value  of  Cio.  Saturation  is  modeled  by  clipping  the  value 
of  Ci  at  2.0  and  0.0;  which  correspond  to  the  upper  (full 
on)  and  lower  (full  off)  limits  of  the  output  voltage 
source. 

The  Control  Output 

The  control  output  is  given  by 

C  =  Cp  +  Ci 

if  Ki  is  not  equal  to  zero,  or  by 

C  =  Cp 

if  Ki  is  equal  to  zero.  This  control  output,  C,  is 
converted  to  an  average  ouput  voltage  such  that  a  control 
output  of  0.0  corresponds  to  0.0  volts;  and  an  output  of  2.0 
corresponds  to  a  100%  duty  cycle  of  the  full  wave  rectified 
120  volt  AC  source,  ie:  a  time  average  output  of  108  volts. 

As  an  example,  consider  the  case  where  Kp  =  0.02, 

Ki  =  0.0  and  the  velocity  error  is  20  RPM.  The  resulting  C 
is  0.02  x  20  =  0.4.  This  results  in  an  average  armature 
voltage  of  (0. 4/2.0)  x  108  =  22  volts.  Average  voltages 
have  been  used  rather  than  RMS  quantities,  since  the 
parameter  of  interest,  the  system's  average  angular 
velocity,  is  proportional  to  the  average  armature  current. 
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B.  Linearization  cf  the  Output  Voltage 

The  actual  output  of  the  SCR  circuit  is  a  full  wave 
rectified  AC  voltage,  with  the  duty  cycle  of  the  half  wave 
pulses  program  controllable.  However,  in  order  for  this 
circuit  to  be  useful  as  a  controller  output  amplifier,  there 
must  be  a  linear  relationship  between  control  input  and 
average  output  voltage.  Since  the  relationship  between  the 
duty  cycle  and  the  average  output  voltage  is  nonlinear,  the 
function  used  to  convert  the  control  input  to  a  duty  cycle 
count  must  compensate  for  this  nonlinearity. 

Consider  one  half  of  a  cycle  of  a  full  wave  rectified 
sine  wave,  as  in  figure  3.  The  SCR  is  turned  on  at  time 
Ton,  and  turns  off  at  the  following  current  zero.  Toff.  The 
average  voltage  over  the  total  cycle  for  a  unit  sinusoid  is 
then  given  by 


Vave 


or 


Vave  =  cos(w*Ton)  -  cos(w«Toff) 


w«Tof f 


Vave  =  1  +  cos  (w*Ton) 

TT 


Thus  the  average 
on  time 


value  ranges  form  0  to  2/7T  depending  on 
Ton.  Scaling  the  output  such  that 


the  turn 


the 
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Figure  3  Variable  Duty  Cycle,  Full  Wave  Rectified  Sine 

Wave 


range  is  from  0.0  to  2.0  (corresponding  to  the  previously 
obtained  control  output) ,  and  solving  for  the  turn  on  time 
in  terms  of  C;  one  obtains: 

7T  •  V a v e  =  1  +  cos  (v*Ton)  =  C 
w«Ton  =  arc  cos(C-l) 

The  last  equation  allows  the  calculation  of  Ton;  the 
required  time  delay  between  the  leading  edge  of  the  zero 
crossing  detector  pulse  and  the  leading  edge  of  the  SCR 
enabling  pulse.  In  the  DC  motor  speed  controller, 
interpolation  is  used  between  the  following  data  points: 


cntrol 

Turn  on 

Average 

utput 

Delay  in 

Output 

C 

Microseconds 

Voltage 

0.00 

8333 

0 

0.25 

6417 

14 

0.50 

5556 

27 

0.75 

4838 

41 

1.00 

4167 

54 

1.25 

3495 

68 

1.  50 

2778 

81 

1.75 

1917 

95 

2.00 

0 

108 
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The  given  average  output  voltage  is  for  a  full  wave 
rectified  120  V  AC  source. 


C.  Calculation  of  System  RPM 

The  slotted  disc,  through  its  associated  circuitry, 
provides  a  system  interrupt  every  45  degrees  of  shaft 
rotation.  In  order  to  measure  system  RPM,  a  16  bit  counter 
is  initialized  by  an  interrupt,  then  latched  by  the 
following  interrupt.  The  down  counter  is  started  at  FFFF 
hex,  and  is  decremented  one  count  by  each  pulse  of  the  1  MHz 
clock.  The  resulting  count,  related  to  the  number  of 
microseconds  between  pulses,  is  stored.  The  average  shaft 
velocity  over  the  past  45  degrees  of  revolution  is  then 
given  by 

RPM  =  7.5  x  10* 

P 

where  P  is  the  number  of  microseconds  elapsed  between 
tachometer  pulses. 


. 
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D.  Over  Current  Protection 

Two  types  of  overcurrent  protection  are  provided; 
instantaneous  and  I2t.  After  the  SCR  duty  cycle  has  been 
updated,  the  armature  current  is  read.  The  value  thus 
obtained  is  compared  to  the  instantaneous  current  limit  of 
five  times  the  rated  steady  state  current  of  the  machine; 
and  if  this  value  is  exceeded,  the  SCR's  are  disabled  and  an 
error  exit  is  performed. 

I2t  protection  is  simulated  by 

Inew  =  Iold  +  Kt  (A«*Iinst-Iold) 
where  Inew  is  the  new  'time  averaged  current';  Iold  is  Inew 
from  the  previous  sample  interval,  Kt  is  effectively  a  time 
constant;  Iinst  is  the  present  instantaneous  current;  and  A 
is  a  scaling  factor.  As  was  the  case  with  the  integral 
control  calculation;  a  sample  time  dependence  of  the 
variable  Kt  is  implied.  Inew  approaches  the  scaled 
instantaneous  current  in  an  exponential  manner,  with  the 
time  constant  determined  by  Kt  and  the  sample  frequency. 

It  is  desired  that  an  armature  current  of  twice  the 
rated  continuous  current  limit  be  tolerated  for  10  minutes; 
and  a  current  of  four  times  the  continuous  limit  be  allowed 
to  flow  for  2.5  minutes.  If  Kt  is  set  to  0.  0004,  and  a 
sample  interval  of  100  msec  is  used;  the  value  of  Inew  will 
rise  to  91%  of  a  constant  A«Iinst  product  in  10  minutes,  and 
to  45%  of  A* Iinst  in  2.5  minutes;  forming  a  reasonable 
approximation  of  an  I2t  characteristic. 

The  scaling  factor  A  is  chosen  such  that  with  a 


. 


* 
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figure  4  Continuous  Current  vs.  Allowed  Time 

constant  input  of  twice  the  motor's  steady  state  armature 
current  limit,  Inew  will  rise  from  zero  to  a  value  egual  to 
the  motor's  steady  state  current  limit  over  a  period  of  10 
minutes.  Thus,  if  a  current  of  5.6  amps  is  applied  with 
A  =  0.549,  at  the  end  of  10  minutes  Inew  is  equal  to  2.8, 
the  steady  state  current  limit  of  the  motor  armature.  At 
this  point  the  SCR's  will  be  disabled  and  an  error  message 
will  be  displayed.  Figure  4  illustrates  the  resulting 
continuous  current  versus  allowed  time  curve.  For 


com  Danson , 


the  ideal  I2t  curve  is  shown  in  a  broken 


line. 
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The  magnitude  of  the  constant  Kt  of 
in  order  to  achieve  a  long  time  constant 
enough  to  avoid  significant  truncation  e 
point  arithmetic  routines. 


0.0004,  while  small 
,  is  still  large 
rror  in  the  floating 


III.  System  Test  Results 


In  order  to  evaluate  system  performance,  an  X-Y  plotter  was 
connected  to  a  shaft  mounted  DC  tachometer.  Motor  RPM  was 
then  plotted  as  a  function  of  time,  under  the  following 
conditions : 

1.  no  load  start  from  rest; 

2.  application  cf  a  step  load  while  running;  and 

3.  a  step  change  in  the  RPM  setpoint. 

The  effects  of  varying  the  sample  interval  were 
investigated,  and  the  characteris tics  of  saturating  and 
nonsaturating  arithmetic  were  compared.  The  effects  of 
parameter  changes  on  system  performance  were  more  pronounced 
at  a  nominal  speed  of  1000  RPM  than  at  the  motor's  rated 
speed  of  1800  RPM;  for  this  reason  the  above  tests  were  done 
at  1000  RPM.  This  exaggerated  response  is  partly  due  to  the 
lower  armature  back  EMF  at  1000  RPM.  When  full  voltage  is 
applied  to  the  armature,  the  large  difference  between  the 
applied  voltage  and  the  back  EMF  allows  a  current  to  flow, 
which  is  an  order  of  magnitude  greater  than  the  steady  state 
current.  This  results  in  a  torque  many  times  greater  than 
what  is  required  under  steady  state  conditions;  which  will 
tend  to  emphasize  ringing  and  overshoot.  The  eventual  use 
of  this  system  will  however  require  the  motor  to  run  at  the 
generator's  synchronous  speed  of  1800  RPM;  thus  the  system's 
performance  as  a  'governor  controlled'  prime  mover  has  also 
been  investigated. 
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A.  DC  Motor  with  No  Control 

In  order  to  establish  a  frame  of  reference,  the 
behavior  of  the  DC  motor  was  evaluated  under  a  no  control 
situation.  The  duty  cycle  of  the  SCR  circuit  was  adjusted 
to  give  a  no  lead  rotary  velocity  of  1000  RPM.  This 
effective  armature  voltage  (Va  =  28  Volts)  was  then  held 
constant  while  load  was  applied  tc  the  generator.  Figure  5 
illustrates  the  resulting  speed  versus  load  characteristic. 
Figure  6  illustrates  the  corresponding  no  load  starting 
response  of  the  system  with  no  control.  The  motor  field 
current  (If)  for  the  above  mentioned  two  graphs  was  held 
constant  at  375  mA. 


B.  DC  Motor  with  Proportional  Control 

In  order  to  study  the  system's  response  with  only 
proportional  control,  the  motor  was  started  from  rest,  under 
no  load  conditions,  with  the  integral  control  constant  set 
to  zero.  The  motor  field  current  was  set  to  375  mA,  and  the 
RPM  setpoint  (Srpm)  was  set  to  1000  RPM.  The  proportional 
gain  constant  was  varied  over  a  range  of  0.005  to  0.5,  and 
graphs  of  RPM  vs  time  were  drawn  on  an  X-Y  plotter.  A 
sample  interval  of  100  msec  was  used. 

The  resulting  graphs  (figures  7  to  11)  illustrate  the 
usual  characteristics  of  a  proportional  control  system.  A 
system  with  a  fairly  lew  proportional  gain  constant  (Kp) ,  in 
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Figure  5  Speed  Load  Characteristic  with  No  Control 


Figure  6 


No  Load  Start;  No  Control 
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Figure  7 


No  Load  Start;  Kp 


0.005 


Figure  8  No  Load  Start;  Kp  =  0.02 
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rigure  9  No  Load  Start;  Kp  =  0.05 


Figure  10  No  Load  Start;  Kp  =  0.1 
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SEC 

Figure  11  No  Load  Start;  Kp  =  0.5 


this  ca 

se  0. 

005 

or 

less,  exhibits  fair 

iy 

( figure 

7)  , 

as 

well  as  an  appreciable 

St 

a  step 

input 

• 

An 

increase  in  proporti 

on 

sharper 

corn 

er 

as 

the  motor  reaches  10 

00 

signif i 

cant 

dec 

rease  in  steady  state  e 

rr 

proport 

ional 

ga 

in 

reaches  0. 1  (figure 

10 

sit  uati 

on  ar 

ise 

s. 

Instead  of  a  notica 

bl 

error. 

there 

no 

w  i 

s  an  oscillation  abo 

ut 

to  the 

high 

gai 

n. 

the  compensation  for 

a 

in  the 

sys  te 

m  o 

ver 

sho-oting  in  the  oppo 

si 

becomes 

guit 

e  extreme  with  a  gain  of  0 

.5 

Fi 

gur  e 

1 1 

als 

o  illustrates  the  di 

f  f 

time  co 

nstan 

ts 

dur 

ing  acceleration  and 

d 

sluggish  response 
eady  state  error,  to 
al  gain  results  in  a 
RPM,  along  with  a 
or.  When  the 
)  a  different 
e  steady  state 
the  set  point.  Due 
small  error  results 
te  direction.  This 

• 

erence  in  the  system 
eceleration.  With 


/ 


i 

■i 

' 

’ 


RPM 


21 


full  voltage  applied  to  the  armature,  the  system  will 
accelerate  at  a  rate  cf  500  RPM  per  second,  while  under  no 
lead  conditions  it  will  coast  to  a  stop  at  only  -50  RPM  per 
second.  Since  this  is  a  discrete  data  ccntrcl  system,  the 
large  difference  between  the  two  time  constants  results  in 
the  error  being  rather  one  sided.  That  is,  with  a  large 
gain  constant,  the  system  is  capable  of  significant  over 
acceleration  between  data  samples;  while  it  takes  several 
sample  intervals  for  significant  deceleraticn  to  take  place. 
Decreasing  the  sample  interval  would  of  course  reduce  the 
error  in  both  directions. 

There  are  also,  visible  in  the  figures,  apparent  high 
freguency  oscillations,  of  less  than  one  millimeter  peak  to 
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peak  amplitude  (corresponding  to  less  than  10  EPM  peak  to 
peak) ,  superimposed  upon  the  RPM  versus  time  graphs.  These 
oscillations  are  not  actually  present  in  the  motor* s  angular 
velocity,  but  are  a  characteristic  of  the  recording  system 
used  to  produce  the  RPM  versus  time  curves.  These 
oscillations,  at  a  frequency  of  approximately  17  Hz  at  1000 
RPM,  are  the  result  of  the  DC  tachometer's  commutated 
output.  A  moderate  amount  of  filtering  has  been  used  to 
reduce  this  noise  to  an  acceptable  level,  but  it  could  not 
be  completely  eliminated  without  affecting  the  X-Y  plotter's 
ability  to  accurately  track  the  system's  response. 

Speed  Load  Characteristics  at  1000  RPM 

The  steady  state  error  of  a  proportional  control  system 
increases  as  the  system  load  is  increased.  Figure  12 
illustrates  the  speed  load  characteristic  for  several  values 
of  Kp,  with  a  velocity  set  point  of  1000  RPM. 
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Figure  13  No  Load  Start;  Kp  =  0.002,  Ki  =  0.01 


Figure  14 


No  Load  Start;  Kp  =  0.01,  Ki  =  0.01 
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Figure  15  No  Load  Start;  Kp  =  0,05,  Ki  =  0.01 


Figure  16 


No  Load  Start;  Kp  =  0.01, 


Ki 


0.  001 
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SEC 

Figure  M  No  Load  Start;  Kp  =  0.01,  Ki  =  0.04 

C.  Proportional  Plus  Integral  Control 

System  response  was  next  evaluated  with  proportional 
plus  integral  control.  As  expected,  the  addition  of 
integral  control  brought  the  average  error  in  the  steady 
state  response  to  a  step  input  to  zero.  In  PI  control,  the 
proportional  gain  constant  has  a  direct  bearing  on  how  fast 
the  oscillations  of  the  integral  control  output  are  damped 
out.  Figure  13  illustrates  lightly  damped  ringing  with  a 
proportional  gain  of  0.002.  Increasing  the  proprtional  gain 
while  holding  the  integral  gain  at  a  constant  value,  results 
in  a  significant  reduction  in  ringing;  as  well  as  a  decrease 
in  overshoot.  A  further  increase  in  Kp  to  0.05  (figure  15) 
results  in  almost  complete  elimination  of  overshoot 


and 
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ringing;  at  the  expense  of  introducing  oscillations  as  a 
result  cf  too  much  proportional  gain  (as  illustrated  in 
figure  10) . 

The  effects  of  tha  integral  gain  constant  (Ki)  were 
examined  by  holding  the  proportional  gain  constant  fixed, 
while  Ki  was  varied.  Figure  16  illustrates  the  increased 
overshoot  as  the  integral  gain  is  reduced;  while  figure  17 
illustrates  the  significantly  reduced  overshoot  and  settling 
time  obtainable  with  higher  integral  gain.  On  the  other 
hand,  the  latter  exhibits  significant  steady  state 
oscillations  due  to  the  high  integral  gain;  whereas  in 
figure  16  these  oscillations  are  insignificant.  This 
suggests  a  tradeoff  between  rapid  damping  of  overshoot  or 
ringing,  and  the  minimization  of  steady  state  oscillation. 
For  example;  values  of  Kp  =  0.01  and  Ki  =  0.01  result  in 
acceptable  system  response. 
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Figure  20 


40  Watt  Load  Step;  Kp  =  0.05 
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figure  21  40  Watt  Load  Step;  Kp  =  0.1 


Figure  22  40  Watt  Load  Step;  Kp  -  0.002,  Ki  -  0.01 
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Figure  23 
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Figure  24  40  Watt  Load  Step;  Kp  =  0,05,  Ki  =  0.01 


Figure  25  40  Watt  Load  Step;  Kp  =  0.01,  Ki  =  0.001 


Figure  26  40  Watt  Load  Step;  Kp  —  0.01,  Ki  0.04 
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D.  The  Application  of  a  Step  Load 

Once  the  no  load  steady  state  velocity  had  been 
reached,  a  step  load  was  placed  on  the  system  by  switching 
the  generator  exciter  field  current  on.  The  730  mA  exciter 
current  resulted  in  40  watts  of  power  being  dissipated  in 
the  generator's  resistive  load.  The  motor  shunt  field 
current  remained  at  the  previous  375  mA. 

The  resulting  HPM  vs  time  graphs  (figures  18  to  26) 
exhibit  a  behavior  similar  to  that  observed  when  the  system 
was  started  from  rest.  Where  only  proportional  control  is 
used,  the  velocity  decrease  as  load  is  applied  is  more 
pronounced  fcr  srrali  values  of  Kp.  As  Kp  is  increased,  this 
average,  loaded  velocity  error  decreases;  at  the  expense  of 
increased  steady  state  oscillations,  as  before. 

The  addition  cf  integral  control  again  brought  the 
steady  state  velocity  back  to  the  set  point.  The  effect  of 
Kp  on  the  damping-  of  ringing  and  overshoot  is  again 
apparent.  Figure  25  again  illustrates  the  slower  response 
with  reduced  proportional  gain;  while  figure  26  typifies  the 
oscillations  accompanying  the  faster  response  resulting  from 


an  increased  Ki 
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E.  Changes  in  the  RPM  Setpoint 

The  previous  nine  graphs  were  repeated  once  more. 
However,  instead  of  the  application  of  a  step  load,  the  RPM 
set  point  was  changed  from  1000  to  1100  RPM.  Due  to  its 
dependence  on  RPM;  the  sample  interval  decreased  to  90  msec 
at  1100  RPM,  while  it  remained  at  100  msec  at  1000  RPM.  The 
motor  field  current  remained  at  375  mA  while  the  generator 
exciter  remained  open  circuited.  The  RPM  setpoint  (Srpm) 
was  changed  from  1000  RPM  to  1100  RPM,  using  the  keyboard 
monitor,  while  the  motor  was  running. 

F.  The  Effects  of  Changing  the  Sample  Interval 

Due  to  the  time  required  for  the  calculation  of  the 
various  control  parameters,  the  minimum  possible  sample 
interval  is  in  the  order  of  10  msec.  By  recording  the 
system  velocity  under  no  load  starting  conditions,  it  was 
determined  that  there  was  little  performance  improvement  to 
be  gained  by  reducing  the  sample  interval  to  50  msec  or 
less.  Also,  increasing  the  sample  interval  to  200  msec  (see 
figure  36)  did  not  significantly  deteriorate  system 
performance  (as  compared  to  figure  14). 

A  further  increase  in  sample  time  will  however  result 
in  unstable  operation.  Starting  the  system  from  rest  with 
Kp  =  0.01,  Ki  =  0.025,  and  a  sample  interval  of  250  msec 
will  result  in  unstable  operation.  Under  no  load  starting 
conditions,  the  system  RPM  will  increase  to  approximately 
1200  RPM;  where  it  will  remain  without  returning  to  its 
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figure  25  RPM  Setpoint  Change;  Kp  =  0.05 
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Figure  32 


HPH  Setpoint  Change;  Kp  =  0.01,  Ki 
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RPM  Setpoint  Change;  Kp  =  0.05,  Ki  =  0.01 
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Figure 


34  RPM  Setpoint  Change;  Kp  =  0.01,  Ki  =  0.001 
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Figure  35 


RPM  Setpoint  Change;  Kp 
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Figure  36  200  msec  sample  interval,  Kp  =  0-01,  Ki  =  0.02 


250  msec  sample  interval,  Kp  =  0.02, 
Ki  =  0.025 


Figure  37 
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setpoint.  If  however,  a  40  watt  load  is  applied,  the  system 
will  return  to  1000  BP M,  maintaining  operation  there  with 
moderate  oscillations,  even  after  the  load  is  removed. 
Starting  the  system  under  a  light  load  will  also  result  in 
stable  operation  at  1000  RPM.  In  figure  37,  a  stable  start 
from  rest  has  been  achieved  by  increasing  Kp  to  0.02;  thus 
increasing  the  effective  damping  on  the  system 

The  integral  gain,  Ki,  contains  a  sample  interval  term, 
dt,  as  explained  previously.  Thus  the  value  of  Ki  must  be 
adjusted  when  the  sample  interval  is  changed  in  order  to 
maintain  the  same  overall  integral  gain.  In  the  above 
mentioned  tests,  Ki  was  adjusted  such  that  the  effective 
integral  gain  was  equal  to  that  obtained  with  Ki  =  0.01  and 
a  sample  interval  of  100  msec. 

G.  Saturating  and  Non-Saturating  Arithmetic 

In  an  analog  integral  control  system,  the  range  of 
variables  is  limited  by  the  saturation  voltage  of  the 
components  involved.  In  a  digital  system,  this  limitation 
is  only  imposed  by  an  overflow  error  in  the  numbers 
involved.  In  a  practical  system,  using  floating  point 
arithmetic,  this  truncation  does  not  occur  until  the  numbers 
involved  exceed  their  practical  values  by  several  orders  of 
magnitude.  The  effect  of  this  can  best  be  visualized  as 
follows.  Consider  starting  the  motor  generator  set  from  a 
standstill  with  integral  control  playing  a  part  of  the 
overall  control  scheme.  Initially  the  error  is  great,  and 
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Figure  38  Nonsaturating  Arithmetic;  Kp  =  0.05,  Ki  -  0.01 


Figure  39 


Saturating  Arithmetic;  Kp  -  0.05,  Ki 


0.01 
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so  is  the  resulting  integral  control  output.  Thus  the 
control  output  is  driven  to  the  upper  limit,  and  the 
corresponding  integral  control  value  is  stored.  At  the 
second  sample  interval,  the  output  is  still  driven  to  its 
upper  limit,  and  another  large  integral  control  value  is 
added  to  the  previous  one.  This  process  repeats  every 
sample  interval,  and  by  the  time  the  system  velocity  reaches 
1000  RPM,  the  stored  integral  control  value  is  of 
considerable  magnitude;  much  larger  than  the  ceiling  value 
of  the  output  stage.  Thus,  even  after  the  system  RPM  has 
overshot  the  setpoint  and  the  error  is  now  in  the  positive 
direction,  considerable  time  is  required  to  ’integrate*  the 
integral  control  value  down  to  zero,  resulting  in  a  very 
large  overshoot.  Eventually,  the  stored  integral  control 
value  becomes  small  enough,  and  the  system  begins  to  ramp 
down  to  1000  BPM  again.  However,  considerable  undershoot 
results,  and  the  cycle  repeats  until  the  system  eventually 
achieves  normal  operation.  Figure  38  illustrates  a  typical 
response  graph  for  a  system  using  non  saturating  arithmetic. 

Fortunately,  it  is  not  necessary  to  let  an  integral 
control  output  reach  a  value  in  excess  of  the  corresponding 
limits  imposed  by  the  output  circuitry.  Thus  in  this 
system,  if  the  integral  control  output  exceeds  the  limits  of 
the  output  circuit  (0.0  and  2.0),  the  integral  control  value 
is  ’clipped'  at  the  proper  value  before  it  is  stored  for  use 
at  the  next  sample  interval.  This  results  in  no  change  in 
performance  at  steady  state  or  for  small  transients,  since 
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under  these  conditions  the  limits  are  never  reached. 

However,  during  large  transients,  as  in  a  system  start  up, 
performance  is  dramatically  improved,  as  illustrated  in 
figure  39.  All  parameters  in  the  twc  above  mentioned  graphs 
are  identical,  the  only  difference  being  the  fact  that  the 
*  saturating'  program  was  bypassed  in  the  former. 


H.  Operation  at  1800  RPM 

Figure  40  illustrates  a  typical  no  load  system  startup 
with  the  setpoint  at  1800  RPM.  Here  the  sample  interval 
counter  is  set  such  that  a  100  msec  sample  interval  is 
obtained  at  1800  RPM.  The  motor  field  current  is  set  to  250 
mA.  Under  these  operating  conditions  oscillations  about  the 
setpoint  are  reduced,  even  with  higher  values  of  Ki  and  Kp. 
This  is  due  to  the  effect  of  the  higher  RPM  on  the  armature 
back  EMF  and  on  the  frictional  and  windage  load.  Since  the 
armature  back  EMF  is  significantly  higher  at  1800  RPM  than 
at  1000  RPM,  the  maximum  armature  current  is  reduced.  As  a 
result,  the  torgue  correspnding  to  maximum  applied  armature 
voltage  is  also  reduced.  Thus  the  amount  cf  over 
acceleration  between  sample  intervals  is  reduced,  resulting 
in  slightly  reduced  error.  The  higher  RPM  also  results  in  a 
significant  increase  in  frictional  load,  as  well  as  an 
increased  load  due  to  motor  and  generator  windage.  These 
effects  increase  the  rate  at  which  the  system  will  coast  to 
a  lower  RPM,  and  thus  reduce  the  deceleration  time  constant 
to  a  more  reasonable  value. 
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Figure  40  No  Load  Start  at  1800  RPM;  Kp  =  0.05, 

Ki  =  0.02 


Figure  41 


Speed  Load  Characteristic  at  1800  RPM 
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Speed  Load  Characteristic  at  .1800  PPM 

Figure  41  portrays  the  system  speed  load  characteristic 
at  1800  KPM.  Here  the  motor  shunt  field  current  was  set  to 
250  mA,  and  a  generator  load  consisting  of  Y  connected  500 
ohm  resistors  was  connected.  The  generator  load  was  varied 
by  changing  the  generator  excitation  current.  The  graph  as 
drawn  indicates  straight  speed-load  lines;  in  practice  they 
are  straight  only  to  about  60  watts.  At  this  point  there  is 
a  rolloff,  due  to  the  limitations  imposed  by  the  source 
voltage  and  current  driving  the  motor. 


I.  Steady  State  Error  with  PI  Control 

With  a  reasonable  choice  of  constants,  the  average 
steady  state  system  velocity  error  can  be  reduced  to 
practically  zero.  However,  there  will  always  be  an 
instantaneous  error  due  to  the  slight  oscillations  about  the 
set  point.  As  previously  mentioned,  the  magnitude  of  these 
oscillations  can  become  quite  large  if  excessively  large 
values  of  Ki  and  Kp  are  used.  Figure  42  indicates  typical 
error  values  obtained  with  a  100  msec  sample  interval. 

It  is  readily  apparent  that  the  magnitude  of  this  error 
can  be  reduced  by  taking  the  following  steps: 

1.  reduction  of  Ki  and  Kp  to  reasonable  values; 

2.  increasing  the  sample  rate; 

3.  increasina  the  system  velocity,  as  explained  above;  and 
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Kp 

Ki 

RPM 

setpoint 

load 

RMS 

error 

01 

.01 

1000 

— 

.  4  % 

01 

.01 

1000 

40  W 

.35  % 

01 

.001 

1000 

— 

.  25  % 

01 

.04 

1000 

— 

.  65  % 

05 

.02 

1800 

— 

.  4  % 

05 

.02 

1800 

50  w 

.07  % 

Figure  42  RMS  Velocity  Error  Under  Typical  Operating 

Conditions 


4.  increasing  the  load  on  the  system,  thus  reducing  the 


deceleration  time  constant 


IV.  Keyboard  Operation  of  the  Microcomputer  System 
In  this  section,  the  keyboard  operation  of  the  computer 
system  is  discussed  from  a  users  point  of  view.  The 
keyboard  supporting  software  consists  of  two  main 
components;  a  system  monitor  and  an  arithmetic  package.  The 
system  monitor  allows  the  user  to  interrogate  memory  and  I/O 
ports,  write  to  alterable  memory  locations  or  I/O  ports,  and 
initiate  program  execution  at  any  desired  address.  Note 
that  in  the  monitor  system,  hexadecimal  notation  is  used 
exclusively.  The  arithmetic  package  consists  of  a  series  of 
floating  point  arithmetic  routines,  which  operate  on  data 
stored  in  preassigned  memory  locations.  Data  manipulation 
routines  are  also  included,  so  that  the  microcomputer  system 
can  be  operated  much  like  a  pocket  calculator.  It  is 
important  to  remember  that  the  monitor  system  is  interrupt 
driven;  thus  after  a  keyboard  initiated  function  has  been 
completed,  program  control  returns  to  the  interrupted 
routine. 
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A.  The  Use  of  the  Monitor  System 

In  order  to  reduce  the  required  number  of  keyboard 
elements,  most  keys  have  two  assigned  functions  (see  figure 
43)  .  The  primary  function,  indicated  on  the  lover  portion 
of  each  key,  is  initiated  by  pushing  the  corresponding  key. 
To  initiate  a  secondary  function,  indicated  on  the  upper 
part  of  the  key,  the  function  (FTN)  key  is  first  pushed, 
followed  by  the  desired  key.  To  minimize  confusion,  two 
important  functions  are  selectable  independent  of  the 
function  (FTN)  key.  These  functions,  system  reset  (RESET) 
and  display  clear  (CLEAR),  are  indicated  by  the  legend's 
position  in  the  center  of  the  key. 

System  Reset 

This  routine  is  executed  automatically  when  the  power 
switch  is  turned  on,  and  thus  is  usually  only  used  when  the 
monitor  loses  program  control  due  to  a  software  error.  The 
function  of  the  system  reset  routine  is  to  initialize  the 
monitor  routine,  clear  the  display,  and  enable  the  interrupt 
system.  At  this  point,  an  •r*  is  displayed  and  program 
control  is  transferred  to  an  idle  loop  to  await  further 
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8 


CGS  XX Y  STR  RCL 

9  E  F 
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5 


6 


x 
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HEX 
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AF1  AF  2  AF3 

1  2  3 


A 


B 


LAD 


AFO  10  10 

FTN  0  WR  RD  CLEAR  RESET 


Figure  43  System  Keyboard  Layout 


Data  Entry  Keys 

The  hexadecimal  digits  0  to  9  and  A  to  F  are  entered  by 
depressing  the  proper  keyboard  element.  As  the 
corresponding  digit  is  displayed  on  the  LED  display,  it  is 
also  entered  into  memory.  If  too  many  characters  are 
entered,  the  previously  entered  digits  are  overwritten, 
starting  at  the  leftmost  (most  significant)  valid  location. 
In  general,  there  are  eight  valid  character  locations; 
except  when  in  the  memory  modification  mode,  where  only  the 
two  hexadecimal  digits  (one  byte)  corresponding  to  the  data 
word  are  alterable. 
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Load  Memory  Address 

In  order  to  load  the  memory  address  to  the  address 
register,  the  four  hexadecimal  digits  defining  the  address 
are  entered,  folloved  hy  the  depression  of  the  load  address 
(LAD)  key.  lor  example: 


Key  Display 

0  0 

2  02 

0  020 

0  0200 

LAD  0200.05 


Note  that  the 
After  the  LAD 
stored  in  the 
corresponding 


most  significant  digit  is  entered  first, 
key  is  depressed,  the  entered  address  is 
address  register,  and  the  content  of  the 
memory  location  is  displayed  (in  this  case 


05) . 


Memory  Bead 

Once  the  address  register  is  loaded,  the  memory  read 
(P.D)  key  will  increment  the  address  register  and  the 
displayed  address.  The  data  stored  at  the  new  location  are 
then  displayed  next  to  the  new  address. 
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Memory  Write 

In  order  to  change  the  data  stored  at  a  particular 
location,  the  required  address  is  first  entered.  The  new 
data,  as  it  is  entered,  will  overwrite  the  old  data  on 
the  display,  but  will  not  yet  affect  the  old  data  in  memory. 
Depressing  the  memory  write  (WR)  key  will  then  store  the  new 
data  in  memory,  increment  the  displayed  address,  and  display 
the  contents  of  the  new  location.  This  data  can  then  also 
be  changed  as  above,  or  the  next  location  can  be  read  using 
the  memory  read  function.  For  example: 


Key  Display 


2000. C3 

2000. 33 

2000.34 
2001.00 
2002.47 


LAD 

3 

4 

WR 

RD 


If  an  error  is  made  in  entering  new  data  and  the  error  is 
noticed  before  the  memory  write  key  is  pushed,  the  correct 
entry  can  simply  be  reentered,  overwriting  the  incorrect 
one.  Also,  the  memory  read  and  memory  write  functions  do 
not  affect  the  initially  entered  address.  Thus,  depressing 
the  load  address  key  will  reenter  the  original  address, 
allowing  one  to  easily  review  just  entered  data.  For 
example: 


' 1 
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Key 

Display 

LAD 

2000. C3 

3 

2000.33 

4 

2000. 34 

2 

2000.24 

3 

2000.23 

WR 

2001.00 

LAD 

2000. 23 

The  Run  Function 

Depressing  the  RUN  key  after  entering  an  address  will 
cause  a  subroutine  call  of  the  program  starting  at  the 
entered  address.  Upon  encountering  a  return  statement, 
program  control  will  return  to  the  execution  of  the  routine 
which  was  interrupted  by  the  key  depression. 

An  error  in  the  called  routine  can  cause  program 
control  to  be  lost  by  the  monitor,  necessita ting  the  use  of 
the  system  reset  (RESET)  key.  For  instance,  the  execution 
of  an  interrupt  disable,  followed  by  a  halt,  will  disable 
the  monitor,  as  well  as  any  other  maskable  interrupt 


initiated  software 
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I/O  Port  Bead 

The  contents  of  any  I/O  port  (if  permitted  by  hardware) 
can  be  read  by  entering  the  two  digit  hexadecimal  port 
address,  followed  by  the  function  (FIN)  and  I/O  read  (10  BD) 
keys.  The  port  address  and  the  contents  of  that  port  are 
then  displayed  as  follows: 


Key 

Display 

0 

0 

5 

05 

FTN 

05 

10  ED 

P05.FE 

I/O  Port  Write 

In  order  to  outpirt  data  to  an  I/O  port,  the  port 
address  is  entered,  followed  by  the  two  hexadecimal  data 
digits.  The  function  (FTN)  and  I/O  port  write  (10  WR)  keys 
are  then  pushed,  as  follows: 

Key  Display 

0  0 

4  04 

D  04D 

C  04DC 

FTN  04DC 

10  KB  P04.DC 

Eight  LED's  on  the  front  panel  are  connected  to  port 
B6,  such  that  a  0  will  turn  the  corresponding  light  ON  and  a 
1  will  turn  it  OFF.  Thus  writing  OF  (hexadecimal  for 
C000  1111)  to  port  address  F6  will  turn  the  four  most 
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significant  (left)  display  locations  on  and  the  four  least 
significant  ones  off. 

Auxiliary  functions 

Four  auxiliary  functions  (AF0r  AF1,  AF2  and  AF3)  keys 
are  provided.  The  purpose  of  these  is  to  allow  the  user  to 
call  an  often  used  subroutine  without  having  to  enter  its 
starting  address  each  time  it  is  used.  The  function  of 
these  keys  can  be  defined  by  software,  or  a  ’forwarding 
address’  to  an  elsewhere  located  routine  can  be  entered  from 
the  keyboard.  The  ’forwarding  addresses'  are  stored  in  the 
following  memory  locations: 


Function 

Address 

Contents 

AFO 

2001 

least  significant 

byte 

2002 

most  significant 

byte 

AF 1 

2004 

least  significant 

byte 

2005 

most  significant 

byte 

AF2 

2007 

least  significant 

byte 

2008 

most  significant 

byte 

AF3 

200A 

least  significant 

byte 

200B 

most  significant 

byte 

As  with  the  run  function,  the  'forwarding  addresses' 


are  accessed  as  subroutines. 
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Data  Manipulation  Routines 

Calculator  functions  are  provided  to  facilitate  the 
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convenient  calculation  of  variables,  and  their  entry  into 
memory  locations  accessible  to  application  programs. 

Numbers  are  entered  and  displayed  in  floating  point  decimal 
format,  using  a  signed  four  digit  mantissa  and  a  signed  one 
digit  exponent.  Although  internal  arithmetic  operations 
allow  decimal  exponents  ranging  from  +32  to  -32,  only 
exponents  from  +9  to  -9  are  entered  or  displayed.  This 
limitation  is  imposed  by  the  number  of  digits  on  the  system 
display. 

f 

Data  Ent  jry 

Decimal  data  is  entered  by  entering  the  digits  into  the 
display  via  the  keyboard.  The  function  (FTN )  key  is  then 
pushed,  followed  by  the  load  (LD Y)  key.  This  enters  the 
floating  point  decimal  number,  converts  it  to  floating  point 
binary,  and  stores  it  in  the  Y  (result)  register. 

The  entered  number  is  interpreted  as  follows.  The 
first  four  entered  digits  will  be  interpreted  as  a  four 
digit  mantissa,  having  a  value  between  1.000  and  9.999.  In 
other  words,  a  decimal  point  is  implied  after  the  first 
digit.  The  fifth  entered  digit,  if  there  is  one,  will  be 
interpreted  to  be  the  exponent.  If  a  fifth  digit  is  not 
entered,  a  zero  exponent  will  be  assumed.  If  either 
mantissa  or  exponent  are  to  have  a  negative  value,  they  mu^»t 
be  preceded  by  a  minus  sign. 


The  minus  sign  is  entered  by 


< 


' 

■ 
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depressing  the  function  key,  followed  by  the  change  sign 
(CGS)  key.  Note  that  the  minus  sign  is  not  counted  as  a 
digit. 
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Often  the  precision  of  the  entered  number  does  not 
require  a  four  digit  mantissa.  If  this  is  the  case,  the  end 
of  the  mantissa  string  can  be  indicated  by  entering  a  minus 
sign  if  the  exponent  is  to  be  negative,  or  an  E  if  the 
exponent  is  tc  be  positive.  If  the  exponent  is  zero,  entry 
can  simply  be  terminated  after  the  required  number  of 
mantissa  digits.  After  the  enter  key  is  depressed,  the 
floating  point  number  will  be  displayed  as  it  has  been 
interpreted,  as  follows: 


Key  Display 

1  1 

2  12 

3  123 

4  1234 

5  12345 

FTN  12345 

LDY  1.234E  5 

CLEAR 

FTN 

CGS 

1  -1 

2  -12 

3  -123 

FTN  -123 

CGS  -123- 

4  -123-4 

FTN  -123-4 

LDY  -1 . 230E-4 


As  illustrated  in  the  example,  an  erroneous  entry  is  removed 
by  depressing  the  CLEAR  key. 


■ 

. 

' 

• 

• 

■ 

• 

The  following  are  several  examples  of  how  data  can  be 
entered  and  how  it  will  be  interpreted: 
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Entered  Data  Interpretation 


1234 

1E4 

1*4 

12 

-1 

12E3 


1.230E  4 
1 . 00 OE  4 
1. 000E-4 
1.200E  0 
-1.000E  0 
1.  200E  3 


Arithmetic  0  peraticns 

Arithmetic  operations  are  performed  using  a  reverse 
Polish  notation.  That  is,  a  number  is  entered  into  the  Y 
register  using  the  Y  register  load  function  (FTN  LDY ) •  A 
second  number  is  then  entered  into  the  display,  and  the 
desired  operation  is  initiated.  Depressing  the  FTN  key, 
followed  by  the  add,  subtract,  multiply  or  divide  key,  loads 
the  presently  displayed  number  into  the  X  register  (in 
floating  point  binary)  ,  and  perforins  the  desired  operation 
on  the  number  in  the  Y  register.  The  result  is  then 
displayed  and  saved  in  the  Y  register,  while  the  last  used 
operant  remains  stored  in  the  X  register.  Ey  selecting  the 
inverse  operation  without  entering  new  data,  the  just 
performed  operation  can  be  undone. 

The  above  mentioned  operations  are  selected  by 
depressing  the  function  key,  followed  by  the  desired 
operation  (+ ,  -,  x  or  r) •  The  add  function  adds  the  X 
register  to  the  Y  register  (leaving  the  result  in  the  Y 
register) ;  subtract,  subtracts  the  X  register  from  the  Y 


«£ 


register;  multiply,  multiplies  the  registers;  and  divide, 
divides  the  Y  register  by  the  X  register.  An  actual 
calculation  proceeds  as  follows: 
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Keys 


Display 


FTN,CGS,3,FTN,LDY 


-8.000E  0 
-6.000E  0 
-1.200E  2 
-6.000E  0 


2  ,  FTN  ,  ♦ 
2E1 ,FTN, x 
FTN,f 


Decimal  to  Binary  Conversion 

When  a  floating  point  decimal  number  is  entered,  it  is 
converted  to  floating  point  binary  before  being  stored.  The 
floating  point  binary  number  stored  in  the  Y  register  can  be 
displayed  in  hexadecimal  notation  using  the  hexadecimal 
display  function  (FTN  followed  by  HEX) .  The  binary  number 
consists  of  a  two's  complement  16  bit  mantissa  followed  by  a 
two's  complement  8  bit  exponent. 

Exchange  X  and  Y  Registers 

The  exchange  registers  function  (FTN  followed  by  XXY) 
will  exchange  the  contents  of  the  X  and  Y  registers.  The 
new  contents  of  the  X  register  are  then  displayed  in 
floating  point  decimal  notation. 


•- 
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Storing  and  Recalling  Data 

Calculation  results  and  entered  data  can  be  stored  in 
one  of  10  (0  to  9)  sensory  registers.  The  number  to  be 

stored  is  taken  from  the  Y  register  (the  result  register)  , 
while  the  recalled  value  is  deposited  in  the  X  register  (the 
operant  register).  After  executing  a  store  instruction  the 
display  is  cleared,  whereas  after  a  recall  instruction,  the 
recalled  number  is  displayed.  Recalling  data  from  a  memory 
register  does  not  alter  the  content  of  that  register,  only 
the  storing  of  nei/  data  will  change  the  memory. 

Data  are  stared  and  recalled  by  first  entering  the  one 
digit  decimal  number  corresponding  to  the  register,  followed 
by  the  function  (FTN)  and  store  (STR)  or  recall  (RCL)  keys 
as  illustrated  below: 


Key 

Display 

1.230E  4 

(Y) 

9 

FTN,  STR 

9 

9 

9 

FTN,  RCL 

1.  230E  4 

(X) 

: 

. 
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C*  Operation  cf  the  DC  Motor  Control  System 

The  microcomputer  system,  together  with  its  DC  motor 
interface  module,  constitutes  a  programmable,  digital  motor 
controller.  An  SCR  circuit,  located  in  the  interface 
module,  provides  a  full  wave  rectified  120  volt  AC,  variable 
duty  cycle  source,  suitable  for  energizing  the  armature  of  a 
DC  motor,  or  the  field  of  a  synchronous  generator.  A  non 
variable,  full  wave  rectified  120  volt  source  is  also 
provided  for  the  DC  motor  field  and  the  synchronous 
generator  field.  A  current  to  voltage  transducer  and  an  A/D 
converter,  located  in  the  interface  module,  allow  the 
microprocessor  to  monitor  the  armature  current.  Angular 
velocity  is  determined  by  measuring  the  time  interval 
between  light  pulses,  modulated  by  a  slotted  disc  which  is 
mounted  on  the  shaft  of  the  motor  generator  set.  Software 
routines  are  provided  to  allow  the  user  to  initialize  the 
application  module,  start  and  stop  the  motor,  alter  control 
variables  and  set  points,  or  to  monitor  the  frequency  of  the 
120  volt  power  grid.  Error  messages  are  provided  to  help 
the  user  avoid  improper  operating  conditions. 
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Memory  Default 

Register  Value 

2 

3 

4  0.02 

5  0.0 

6  1000 

7 

8  2.8 
9 


Variable 

scaled  time  averaged  current 
present  control  output 
proportional  gain  constant 
integral  gain  constant 
RPM  set  point 
present  rpm 

steady  state  current  limit 
present  current 


Figure  44  Motor  Control  Variables  and  Set  Points 

Motor  Control  Routine  Initialization 

Executing  the  motor  control  initialization  routine  will 
do  the  following: 

1.  The  counter  controlling  the  SCR  circuit  is  disabled. 

2.  The  following  auxiliary  functions  are  defined  for  later 
use : 

AF0  -  step  motor 
AF 1  -  start  motor 

AF2  -  display  frequency  of  power  mains 

3.  The  sanple  interval  counter  is  defaulted  to  13 
(decimal),  resulting  in  a  sample  interval  of  100  msec, 
at  1000  RPM. 

4.  Default  values  for  the  control  variables  and  set  points 


- 
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are  loaded,  as  per  figure  44  . 

The  initialization  routine  is  called  from  the  keyboard 
by  loading  its  address  (1000  hex)  and  pressing  the  load 
address  and  run  keys.  The  display  will  be  cleared,  awaiting 
further  instructions. 

It  must  be  kept  in  mind  that  when  the  microcomputer 
system  is  powered  up,  the  SCR  controlling  circuit  will 
initialize  in  an  unpredictable  state.  Thus,  to  prevent 
damage  to  the  motor  control  interface,  or  to  the  motor 
itself,  the  SCR  ENABLE  switch  must  be  in  the  OFF  position, 
from  when  power  is  first  applied,  until  the  motor  control 
initialization  routine  has  been  executed. 


Starting  the  Motor 

Before  starting  the  motor,  the  light  source  for  the 
digital  tachometer  should  be  activated.  The  SCR  ENABLE 
switch  should  then  be  turned  ON  and  the  motor  started  by 
pressing  the  function  key  (FTN)  ,  followed  by  the  auxiliary 
function  1  (AF1)  key. 
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Stopping  the  Motor 

The  motor  can  be  stopped  under  program  control  using 
auxiliary  function  0  (AFQ) .  If  for  some  reason  program 
control  is  lost,  the  motor  can  also  be  brought  to  a  stop  by 
turning  the  SCR  ENABLE  switch  OFF. 


Altering  and  Reading  Control  Variables  and  Set  Points 

The  following  motor  control  variables  and  set  points 
are  readily  altered  by  the  system  user: 

1.  The  proportional  gain  constant. 

2.  The  integral  gain  constant. 

3.  The  RPM  setpoint. 

4.  The  continuous  armature  current  limit. 

5.  The  sample  interval  counter. 

All  of  the  above  variables,  excluding  the  last,  are  changed 
by  loading  the  new  variable  into  the  corresponding  memory 
register  ,  as  per  figure  44.  The  sample  interval  counter  is 
altered  by  loading  the  new  value,  in  hexadecimal,  into 
memory  location  2065  hex  using  the  system  monitor. 

The  following  control  outputs  are  also  available  to  tne 

user: 

1.  The  present  RPM. 

2.  The  present  armature  current. 

3.  The  present,  scaled,  time  averaged  armature  current. 

4.  The  present  control  output. 

These  are  accessed  by  recalling  the  appropriate 
register,  as  indicated  in  figure  44. 


memory 
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It  should  be  kept  in  mind  that  since 
system  is  interrupt  driven,  it  is  entirely 
control  variables  or  set  points,  or  to  use 
monitor  functions,  while  the  motor  control 
active. 


the  microcomputer 
possible  to  alter 
the  calculator  or 
program  is 


Continuous  M cnitoring  of  Variables 

It  is  often  desirable  to  continuously  display  one  of 
the  system  parameters.  The  program  listed  in  figure  45 
reads  the  desired  variable  from  the  memory  register, 
converts  it  to  a  floating  point  decimal  number,  and  writes 
it  to  the  system  display;  updating  the  variable  every  two 
seconds. 

In  order  to  take  advantage  of  this  program,  it  must 
first  be  entered  into  memory  using  the  keyboard  monitor, 
starting  at  location  2400  hex.  The  program  is  then 
initiated  by  loading  the  starting  address  and  pressing  the 
BUN  key.  The  motor  can  be  started  either  before  or  after 
initializing  the  display  program,  by  using  the  proper 
auxiliary  function. 

Execution  of  the  variable  display  program  is  terminated 
by  depressing  the  clear  key.  New  commands  can  then  be 
entered,  or  the  program  itself  can  be  modified.  For 
example,  altering  memory  location  2419  hex  will  alter  the 
update  interval,  while  changing  location  2411  hex  will 
specify  the  display  of  a  different  memory  register.  During 
use,  this  program  replaces  the  idle  loop  as  the  background 
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*  MEMORY  DISPLAY  * 

*  ROUTINE  * 


CPCLF  EQU 

0C1BH 

DDAT7  EQU 

2018H 

DISPF  EQU 

2066H 

DISPLAY  ENAEIE  FLAG 

2400 

F5 

START : PUSH 

PSW 

SAVE  INT  REGISTERS 

240  1 

C5 

PUSH 

B 

2402 

E5 

PUSH 

H 

2403 

FB 

El 

ENABLE  INTERRUPTS 

2404 

3EFF 

M  VI 

A,0FFH 

2406 

328620 

STA 

DISPF 

SET  ENABLE  FLAG 

2409 

3A6620 

LOOPO :LDA 

DISPF 

LOAD  DISPLAY  FLAG 

2  40C 

A7 

ANA 

A 

TEST 

240C 

CA2F24 

JZ  ENDIT 

EXIT  IF  RESET 

2410 

3E07 

M  VI 

A  ,  07H 

LCAD  MEMORY  REGISTER 

TO  BE  DISPLAYED 

2412 

321820 

STA 

DDAT7 

STORE  IN  MEMORY 

ADDRESS  POINTER 

2415 

CD1B0C 

CALL 

CRCLF 

CALL  ROUTINE  TO 

DISPLAY  DATA 

2418 

0604 

M  VI 

B ,  04H 

LOAD  COUNTER  FOR  NUMBER 

OF  HALF  SECOND  DELAY  LOOPS 

2  4  1 A 

2100F4 

LOOP  1 : LXI 

H , 0F4  G0H 

LOAD  HALF  SECOND 

DELAY  COUNT 

24  1  D 

2B 

LOOP  2 : DCX 

H 

DECREMENT 

24 1  E 

7D 

MOV 

A  ,  L 

2  4  1 F 

A7 

ANA 

A  • 

TEST  LS  BYTE 

2420 

C21D24 

JNZ 

LOOP2 

REPEAT  IF  NOT  ZERO 

2423 

7C 

MOV 

A  r  H 

2424 

A7 

ANA 

A 

TEST  MS  BYTE 

2425 

C21D24 

JNZ 

LOOP2 

REPEAT  IF  NOT  ZERO 

2428 

05 

DCR 

B 

DECREMENT  HALF 

SECOND  COUNTER 

2429 

C21A24 

JNZ 

LOOP1 

REPEAT  IF  NOT  DONE 

242C 

C30924 

JMP 

LOOPO 

DELAY  EXPIRED , 

DISPLAY  NEW  DATA 

242F 

El 

ENDIT: POP 

H 

RESTORE  INTERNAL  REGS 

2430 

Cl 

POP 

B 

2431 

FI 

POP 

PSW 

2432 

C  9 

RET 

RETURN 

Routine  for  Continuous  Memory  Register  Display 


Figure  45 
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routine,  thus  the  interrupt  driven  motor  control  routine 
should  not  be  interfered  with. 

Monitoring  the  Power  Mains  Frequency 

Synchronizing  pulses  provided  by  the  motor  interface 
module  can  also  be  used  to  determine  the  frequency  of  the 
power  grid.  Once  the  motor  initialization  routine  has  been 
executed,  the  power  mains  frequency  can  be  displayed  by 
depressing  the  function  key,  followed  by  auxiliary 
function  2  (AF2)  »  it  is  not  necessary  to  turn  the  SCR 
ENABLE  switch  ON  in  order  to  execute  this  routine. 

D.  System  Error  Messages 

In  order  to  give  the  user  a  fighting  chance  in 
debugging  system  software  problems,  a  number  of  error  exits 
are  strategically  located  throughout  the  system  software. 
When  such  an  error  occurs,  the  microcomputer  will  display  an 
error  code  (for  example:  Er  13) ,  execute  a  halt  command,  and 
await  further  instructions  from  the  keyboard. 

The  error  codes  are  defined  as  follows: 

1.  An  interrupt  has  occurred  for  which  no  service  routine 
is  defined.  An  undefined  interrupt  vector  at  the 
beginning  of  memory,  or  noise  on  the  interrupt  lines  are 
likely  causes. 

key  has  been  depressed  for  which  no  service  routine  is 
defined.  There  is  also  a  possibility  that  an  erroneous 
key  code  was  returned  from  the  8279  on  the 
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key  board/display  interface  board.  (Also  see  error  3.) 

3.  A  keyccde  corresponding  to  a  non  existing  key  was 
returned  from  the  8279  on  the  keyboard/display  board. 

4.  A  binary  exponent  overflow  has  occurred  in  the  floating 
point  multiplication  routine. 

5.  A  binary  exponent  underflow  has  occurred  in  the  floating 
point  multiplication  routine. 

6.  A  binary  exponent  underflow  has  occurred  in  the  floating 
point  normalization  routine. 

7.  A  binary  exponent  overflow  has  occurred  in  the  floating 
point  division  routine. 

8.  An  attempt  was  made  to  divide  by  zero  in  the  floating 
point  division  routine. 

9.  Binary  exponent  overflow  in  the  floating  point  division 
routine. 

10.  Binary  exponent  underflow  in  the  floating  point  division 
routine. 

11.  An  out  of  range  memory  register  address  was  encountered 
in  the  execution  of  the  data  store  instruction. 

12.  An  out  of  range  memory  register  address  was  encountered 
in  the  execution  of  the  data  recall  function. 

13.  An  auxiliary  function  key  was  used  without  first 
entering  the  'forwarding  address'. 

14.  A  decimal  exponent  of  magnitude  greater  than  99  was 
encountered  in  the  floating  point  binary  to  decimal 
conversion  routine. 

15.  A  two  digit  decimal  exponent  was  encountered  in  the 
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decimal  display  routine. 

16.  A  decimal  exponent  overflow  has  occurred  after  exponent 
roundoff  in  the  decimal  display  routine. 

17.  Undefined. 

18.  Undefined. 

19.  Undefined. 

20.  Data  contained  in  a  memory  location  does  not  agree  with 
data  that  has  just  been  entered  using  the  memory  write 
function.  The  most  likely  cause  of  this  problem  is  an 
attempt  to  write  to  a  read  only  memory  location. 

21.  An  attempt  has  been  made  to  start  the  DC  motor  without 
specifying  the  maximum  operating  current. 

22.  An  RPM  set  point  has  not  been  entered. 

23.  Neither  a  proportional  nor  and  integral  gain  constant 
has  been  defined. 

24.  The  instantaneous  current  limit  has  been  exceeded. 

25.  The  time  averaged  current  limit  has  been  exceeded. 

The  above  error  definitions  are  only  a  brief  summary; 

more  detailed  information  can  be  found  in  the  following 

software  documentation. 
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System  Hardware 


In  this  chapter  a  detailed  description  of  the  system 
hardware  is  presented.  The  design  of  the  circuitry  was 
governed  by  the  following  considerations: 

1.  The  system  should  be  composed  of  several  functional 
modules  to  facilitate  troubleshooting  and  permit 
modification  and  expansion. 

2.  An  attempt  should  be  made  to  obtain  reasonable  power 
dissipation  in  the  digital  circuitry,  through  the  use  of 
low  power  Schottky  logic  where  possible. 

3.  A  reasonable  amount  of  self  protection  should  be 
included  in  the  design.  This  includes  error  checks  in 
software,  the  use  of  proper  fusing,  and  optical 
isolation  between  the  microcomputer  system  and  the  motor 
interface  module. 
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A.  Bus  Structure 

The  bus  system  serves  two  functions:  the  distribution 
of  regulated  power;  and  the  transmission  of  data,  address, 
and  control  signals  between  the  individual  circuit  cards 
comprising  the  system.  Several  edge  connector  elements  are 
used  in  parallel  for  the  power  supply  connections  to  reduce 
the  effects  cf  contact  resistance.  The  definition  of  the 
individual  logic  signals  making  up  the  system  bus  is  a 
compromise  between  too  complex  a  data  encoding  scheme  and 
too  many  individual  control  lines.  The  bus  lines  are 
allocated  as  follows: 


1.  Regulated  +5  volt  supply; 
four  parallel  connectors 
are  used, 

2.  Regulated  +5  volts 

3.  Left  blank  for  isolation 

4.  DO  -  bidirectional  8  bit 
data  bus;  all  elements 
inverted. 

5.  D2 

6.  D4 

7.  D6 

8.  AO  -  16  bit  address 
bus;  all  elements 
inverted • 

9.  A2 
10.  A 4 
1  1.  A6 
1  2.  A  8 


51.  Regulated  +5  volts 

52.  Regulated  +5  volts 

53.  Left  blank  for  isolation 

54.  D 1 

55.  D3 

56.  D5 

57.  D7 

58.  A 1 

59.  A3 

60.  A5 

61.  A  7 

62.  A  9 


. 
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13.  A 1  0 

14.  A12 

15.  A 1  4 

16.  SOD  -  Serial  data  output 
line;  inverted. 

17.  AV  -  Least  significant 
address  byte  valid; 
active  low. 

18.  RD  -  Read  ANDed  with 
clock  phase  2;  active 
high. 

IS.  WR  -  Write  ANDed  with 
clock  phase  2;  active 
high. 

20.  SO  -  Inverted;  SO  and 
Si  provide  encoded  ad¬ 
vance  read/write  signals. 

21.  Reserved  for  external 
clock  input. 

22.  RIN  -  Reset  input; 
active  low. 

23.  HIN  -  CPU  hold  reguest; 
active  lew. 

24.  RDY  -  Memory  not  ready; 
active  lew. 


25.  Spare 

26.  Spare 

27.  Spare 

28.  Spare 

29.  Spare 

30.  Spare 

31.  Spare 

32.  Spare 


63.  All 

64.  A13 

65.  A 1 5 

66.  SID  serial  data  input 
line;  inverted. 

67.  EINT  -  encoded  interrupt 
(EI0  to  EI7)  from  8214; 
active  lew. 

68.  INTA  -  Read  signal  for 
interrupt  instruction; 
active  high. 

69.  10 M  -  I/O  address 
(low) ,  or  memory 
address  (high)  . 

70.  SI  -  Inverted. 


71.  COUT  -  Phase  2  clock 
output;  inverted. 

72.  ROUT  -  Reset  output, 
active  low. 

73.  HCUT  -  Hold  acknowledge 
output;  active  low. 

74.  OF  -  Opcode  fetch  -  used 
to  trigger  the  logic 
analyzer;  active  low. 

75.  Spare 

76.  Spare 

77.  Spare 

78.  Spare 

79.  Spare 

80.  Spare 

81.  Spare 

82.  Spare 


. 
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33.  Spare 

34.  Spare 

35.  Spare 

36.  Spare 

37.  Spare 

38.  Ill  -  On  chip  interrupt; 
RST  5.5;  active  low. 

39.  113  -  RST  7.5;  active 
low. 


40.  EI0  -  External  interrupt 
lines  to  8214;  INTO; 
active  low. 


34.  Spare 

84.  Spare 

85.  Spare 

86.  Spare 

87.  Spare 

88.  112  -  RST  6.  5;  acitve 
low. 

89.  NMI  -  Non  maskable 
interrupt;  TRAP;  active 
low. 

90.  Ell  -  INTI. 


41.  EI2  -  INT2 

42.  EI4  -  INT4 

43.  El 6  -  INT6 

44.  HFC  -  High  frequency 
clock  out;  1  MHz. 

45.  Left  blank  for 
isolation. 

46.  Regulated  -5  volt 
supply;  two  parallel 
connectors  are  used. 

47.  Regulated  +12  volt 
supply;  two  parallel 
connectors  are  used. 

48.  Spare 

49.  Ground;  four  parallel 
connectors  are  used. 

50.  Ground 


91.  El 3  -  INT3. 

92.  El 5  -  INT5. 

93.  El 7  -  I NT7 

94.  LFC  -  Low  frequency 
clock  out;  100  kHz. 

95.  Left  blank  for 
isolation. 

96.  Regulated  -5  volts. 

97.  Regulated  +12  volt 
supply. 

98.  Spare 

99.  Ground 

100.  Ground 


More  information  on  the  individual  bus  signals  can  be 
found  by  referring  to  the  microprocessor  beard  description 
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Figure  46  AC  Hiring  Diagram 

B.  AC  Hiring 

The  AC  input  is  limited  by  a  3  amp,  slow  blowing  fuse. 
The  fuse  ampacity  is  large  when  only  steady  state  current  is 
considered;  but  it  is  required  to  supply  the  inrush  current 
drawn  by  the  large  power  supply  capacitors.  Protection  from 
incoming  transients  is  provided  by  a  transient  suppressor 
connected  between  the  hot  and  neutral  conductors.  A  double 
pole  switch  is  used  to  provide  isolation  on  both  the  hot  and 
neutral  sides  cf  the  primary  circuit. 

The  power  on  indicator  circuit  [41]  consists  of  an  LED 
in  series  with  a  current  limiting  impedance  connected 
accross  the  120  V  source.  The  diode  conducts  when  the  LED 
is  off,  preventing  reverse  breakdown  of  the  LED.  A 
capacitor  forms  part  of  the  series  impedance, 
real  power  dissipated  as  heat. 
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C.  System  Power  Supplies 

Regulated  DC  power  is  supplied  at  three  voltages:  +  12 
volts  at  1  amp;  -5  volts  at  1  amp;  and  +5  volts  at  3  amps. 
The  +12  and  -5  volt  supplies  are  only  required  for  the  2708 
memory  ICs,  and  are  adequate  even  for  an  expanded  system. 
The  three  amp  +5  volt  supply  however,  will  net  support 
significant  expansion  beyond  the  existing  system,  thus  room 
has  been  left  for  the  insertion  of  a  more  substantial 
supply.  The  existing  transformer  and  filter  capacitors  are 
adequate  for  a  +5  volt  supply  of  up  to  14  amps.  The  power 
supply  circuitry  is  illustrated  in  figures  47  to  49. 

System  Cooling 

The  TO-220  packages  housing  the  -5  and  +12  volt 
regulators  are  cooled  using  Wakefield  680-.75  heat  sinks. 
The  +5  volt  regulator  TO-3  pack  requires  a  680-1.25  heat 
sink  due  to  the  higher  current  passing  through  it.  All 
three  regulators  will  supply  full  rated  current  without 
exceeding  maximum  junction  temperatures  with  only  natural 
con vecit ve  cooling.  However,  when  the  CPU  enclosure  is 
fully  assembled,  natural  convection  is  not  possible,  thus 
two  Pamotor  4800X  fans  are  used  to  force  air  through  the 
enclosure,  cooling  both  the  power  supplies  and  the  digital 
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Figure  47  Positive  12  Volt  Regulator  Circuit 


Figure  48  Negative  0  Volt  Regulator  Circuit 


Figure  49 


Positive  5  Volt  Regulator  Circuit 
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D.  Microprocessor  Board 

The  main  microprocessor  board  consists  cf  two 
functional  blocks: 

the  microprocessor  chip  and  the  associated  circuitry 
interfacing  it  to  the  bus;  and 

the  circuitry  required  to  interface  the  Intel  8279 
keyboard/display  chip  to  the  system  bus. 

The  latter  interface  will  also  accomodate  the  future 
addition  of  an  Intel  8253  timer  IC,  and  an  Intel  8214 
interrupt  decoder  Circuit. 

Figures  50  to  53  illustrate  the  circuitry  located  on 
the  microprocessor  board,  while  figure  52  provides  the 
corresponding  component  list.  The  alphabetic  IC  position 
code  given  on  the  component  list  refers  to  the  position  of 
the  IC  packace  on  the  wirewrap  board,  relative  to  the 
alphabetic  grid  printed  along  the  edges  cf  the  board. 

CPU  Control  Signals 

Figure  50  illustrates  the  interface  circuitry  between 
the  Intel  8085  microprocessor  (IC  BZ)  and  the  system  bus. 

The  interface  circuitry  is  designed  such  that  a  CPU  hold 
acknowlege  will  place  all  bus  drivers  affecting  the  system 
address,  data,  and  control  line  into  a  high  impedance  state. 
This  will  allow  the  future  addition  of  direct  memory  access. 
The  use  cf  8T  series  high  impedance  bus  drivers  and 
receivers  allows  the  full  expansion  of  the  system  to  fill 
the  11  provided  card  slots,  as  well  as  permitting  the 
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Figure  50 


Main  CPO  Board 


Control  Signals 
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Figure  51 


Main  CPU  Board  -  Address  and  Data  lines 
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— 
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16 
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8 
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gnd:  15 

BY 
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BZ 
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20 

CK 

8160 

16 

8 

CL 

74LS20 

14 

7 

CP 

8520 

5 

12 

CR 

8520 

5 

12 

CT 

74LS04 
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7 

CV 

74LS04 

14 

7 

CW 

74LS04 

14 

7 

CX 

3T96 
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8 
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CY 
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8 

DY 
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Figure  52  CPU  Board  IC's 
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instruction  which  is  required  if  the  I NT R  pin  on  the  8085  is 
used.  Since  the  duration  of  the  read  and  write  pulses  are 
too  short  for  slower  memory  IC's,  such  as  the  2708*5,  SO  and 
SI  are  also  coupled  to  the  bus.  These  two  signals  can  be 
decoded  to  provide  an  advanced  read  or  write  signal  for  use 
with  slower  devices. 

The  bus  write  signal  (BW)  enables  the  data  bus  drivers 
in  the  write  mode.  ALE  and  Si  are  used  to  derive  this 
signal,  such  that  the  data  bus  is  active  net  only  for  the 
entire  data  valid  period,  but  also  while  ALE  is  valid,  so 
that  the  lower  order  address  byte  can  also  be  obtained  from 
the  data  bus.  This  has  been  done  to  maintain  system 
compatabilit y  with  the  newer  8085  support  chips,  many  of 
which  require  this  multiplexed  address  and  data. 

The  reset  input,  the  hold  and  memory  ready  inputs,  and 
the  system  interrupts  (TRAP  and  RST  5.5  to  7.5)  have  been 
buffered  such  that  the  input  to  the  board  is  pulled  high 
(inactive)  with  a  resistor;  providing  a  wired  OR 
configuration.  An  active  state  can  then  be  obtained  by 
pulling  the  proper  bus  line  low. 

The  system  clock  consists  of  a  6  MHz  crystal  connected 
to  the  808  5  *  s  on  chip  oscillator  circuit.  A  100  picofarad 
capacitor  is  used  to  trim  the  frequency,  such  that  a 
deviation  of  less  than  0.01%  is  obtained.  The  CPU  chip's 
3  MHz  clock  output  is  divided  down,  using  two  8520  counter 
ICs,  to  provide  1  MHz  and  100  KHz  clock  outputs. 
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Address  and  Data  Lines 

Address  and  data  buffering  between  the  microprocessor 
and  the  system  bus  is  illustrated  in  figure  51.  The  8085 
outputs  the  least  significant  address  byte  on  the  data  pins 
during  the  first  phase  of  a  machine  cycle.  An  8212  (IC  DY) 
is  used  as  a  transparent  latch  to  hold  this  address  byte  for 
the  duration  of  the  machine  cycle.  The  most  significant 
address  byte  is  stable  for  the  duration  of  the  machine 
cycle,  and  thus  only  needs  to  be  buffered.  The  data  line 
buffers,  as  mentioned  previously,  are  enabled  in  the  bus 
write  mode  for  the  entire  write  cycle.  For  a  read  cycle, 
they  are  enabled  in  the  bus  read  mode  only  for  the  duration 
of  clock  phase  02. 


E.  Keyboard  and  Display  Interface 

Also  located  on  the  CPU  board  is  the  circuitry  reguired 
to  interface  several  peripheral  chips  to  the  system  bus  (see 
figure  53).  Presently  only  an  8279  display/keyboard 
interface  IC  is  used;  however,  provisions  have  been  made  to 
add  other  devices,  such  as  an  8214  interrupt  decoder  and  an 
8253  timer/ccunter  IC. 

A  bidirectional  data  bus  is  provided  (PDO  to  PD7)  for 
use  with  t he se  peripheral  devices.  The  bus  buf f er s  are 
active  in  the  CPU  read  (bus  write)  mode  for  clock  phase  two 
of  a  CPU  I/O  read  cycle  if  the  board  select  signal  (P3A)  is 
active ;  or  for  an  interrupt  acknowledge.  At  all  other 
times,  the  bus  drivers  are  in  a  high  impedance  state. 
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figure  53 


Peripheral  IC  Interface  to  System  Bus 
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Figure  54 


System  Display  and  Keypad 
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IC 

Position 


IC 

Type 


Misc 

Power  Gnd  Connections 


PEI 

PB2 

PBS 

PB4 

PE5 


74LS138  16  8  gnd:  4,  5 


7406  14  7 

7406  14  7 

7406  14  7 


8279  40  20 


Figure  55  Display  Board  IC's 


During  a  CPU  I/O  write  cycle?  the  bus  receivers  are  active 
in  the  CPU  write  (bus  read)  mode  for  the  entire  cycle. 

The  five  most  significant  bits  of  the  8  bit  I/O  address 
are  compared  to  five  switch  inputs  by  IC  CK  to  derive  a 
board  select  signal,  PBA •  This,  and  the  three  least 
significant  address  bits,  provided  both  inverted  and 
noninverted,  can  then  be  used  to  derive  the  required  chip 
select  signals  for  the  individual  support  chips.  The  8279 
thus  occupies  I/O  addresses  nnnn  nlOO  and  nnnn  n101 
(binary)  ,  where  n  is  selected  by  the  switches  (IC  AJ)  • 

The  required  signals  are  then  brought  tc  the  8279, 
located  on  the  system  display  board,  via  a  16  conductor 
ribbon  cable  (figure  54) .  A  3  to  8  decoder  is  used  to 
decode  the  SO  to  S2  outputs  of  the  8279  (net  to  be  confused 
with  the  SO  and  Si  outputs  of  the  8085)  in  order  to  select 
an  individual  row  of  the  keyboard  matrix,  as  well  as  an 
individual  seven  segment  display  digit.  The  keyboard  matrix 
columns  are  scanned  for  a  switch  closure  by  the  8279's 
return  lines;  B0  to  R5. 
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Read  Only  Memory  Beard 
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Figure  57 


ROW  Board  ICs 


Display  data  is  output  through  the  data  pins  AO  to  A3 
and  BO  to  E3 ;  buffered  through  high  voltage  open  collector 
inverters.  The  inverters  in  turn  enable  the  proper  current 
sourcing  transistors,  which  enable  the  required  display 
segments.  The  currently  active  output  of  the  3  to  8 
decoder,  through  a  similar  inverter/transistor  circuit. 


sinks  the  common  cathode  current  from  the  proper  display  IC. 
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Figure  58 


Fandom  Access  Memory  Board 
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Figure  59  RAM  Board  ICs 


F.  Read  Only  Memory 

The  read  only  memory  board  (figures  56  and  57)  is 
designed  to  hold  up  to  eight  2708  EPROMs,  providing  8K  bytes 
of  permanent  memory  (1  K  of  memory  represents  1024  bytes). 
The  three  most  significant  bits  of  the  board  address  are 
switch  selectable.  This  selected  board  address  is  compared 
to  the  three  most  significant  address  bits  by  IC  AP.  If  a 
match  is  obtained,  the  board  address  signal,  EBA  becomes 
active.  The  board  address  signal,  together  with  the  memory 
address  signal  (M)  and  the  advanced  read  signal  (Si)  enable 
the  output  of  the  2708  selected  by  address  lines  A10  to  A12 
through  IC  AR.  The  data  bus  drivers  are  enabled  during 
phase  two  of  the  system  clock  by  the  bus  write  signal  (ER) 
generated  by  IC  AS. 
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G.  Randoa  Access  Memory 

The  random  access  memory  board  (see  figures  58  and  59) 
consists  of  sixteen  2102A-4  memories,  providing  2K  eight  bit 
words  of  memory.  Space  on  the  board  and  address  decoding 
has  been  provided  for  the  addition  of  a  further  2K  bytes  of 
RAM.  The  first  1024  bytes  of  memory,  provided  by  ICs  BY  to 
BP  (corresponding  to  DO  to  D7)  are  selected  by  CSO;  the 
second  IK,  consisting  of  ICs  CY  to  CP,  are  selected  by  CS1 ; 
the  third  IK,  DY  to  DP,  by  CS2;  and  the  final  IK,  ICs  BN  to 
BK  and  CN  to  CK,  are  selected  by  CS3. 

The  beard  address  is  selected  by  switch  package  AJ,  and 
is  compared  to  the  four  most  significant  address  bits  by  IC 
AR.  IC  AP  decodes  address  bits  A10  and  All  to  select  the 
desired  1024  byte  block  of  memory.  If  the  board  address, 
ABA,  is  valid,  the  bus  buffers  are  enabled  in  the  bus  write 
(CPU  read)  mode  by  the  memory  read  signal  (AR).  During  the 
active  portion  of  the  CPU  write  signal,  the  board  write 
signal,  AW,  enables  the  data  bus  buffers  in  the  bus  read 
(CPU  write)  mode,  and  the  2102A-4s  in  the  write  mode. 
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Figure  60  Application  Module  Interface  Beard  -  Address 

and  Data  Buffers 


H.  Motor  Interface  Module 

The  motor  interface  module  (figures  60  and  61)  consists 
of  the  logic  reguired  for  the  microcomputer  to  control  the 
duty  cycle  of  the  SCR  circuit;  read  the  digitized  armature 
current;  time  the  interval  between  optical  tachometer 
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ure  61 

Application 

Module 

Interface  ICs 

pulses;  and  detect  timer  overrun  conditions.  This  logic 
appears  to  the  microcomputer  bus  as  a  series  cf  I/O  ports. 
Interface  between  the  outputs  of  this  card  and  the  external 
circuitry  is  provided  using  optical  isolators;  both  for  the 
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voltage  translation  where  required. 
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The  data  bus  is  buffered  by  ICs  AX  and  AY  to  provide 
eight  bidirectional  data  signals,  IDO  to  ID7,  for  use  on  the 
interface  card.  The  four  most  significant  I/O  address  lines 
are  compared  to  switch  inputs  by  IC  AJ,  providing  a  board 
address  valid  signal  (IBA)  when  a  proper  I/O  address  is 
output  on  the  system  bus.  If  the  board  address  and  the  IOM 
signals  are  of  the  proper  logic  level,  the  data  bus  drivers 
are  enabled  in  the  bus  write  (CPU  read)  mode  for  the 
duration  of  the  read  (RD )  pulse.  At  all  ether  times  the 
data  bus  buffers  are  active  in  the  bus  read  (CPU  write) 
mode.  The  three  least  significant  address  bits  are  decoded 
by  IC  AS  to  provide  eight  chip  select  outputs;  enabled  if 
address  bit  A3  is  a  logical  0. 

The  Front  Panel  LEE  Array 

Eight  light  emitting  diodes,  located  on  the  front 
panel,  are  enabled  by  IC  DL  located  on  the  application 
module  rnterface  card  (see  figure  62).  Since  the  LEDs  are 
turned  on  when  IC  DL  acts  as  a  current  sink,  a  logical  0 
will  turn  the  corresponding  LED  ON;  while  a  logical  1  will 
turn  it  OFF.  The  one  ohm  resistor  and  the  0.1  microfarad 
capacitor,  through  which  the  LED  current  is  source^,  serve 
to  decouple  the  LED  switching  surges  from  the  system  power 
bus.  The  output  port  is  selected  by  an  active  write  signal 
ANDed  with  chip  select  six,  resulting  in  a  pert  address  of 
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figure  62  Front  Panel  LED  Array 


nnnn  0110  (binary);  where  nnnn  is  selected  by  the  board 
address  switches* 
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rasmable  SCR  Circuit 

cntrol  is  achieved  by  varying  the  average  DC 
ge  of  the  SCR/rectifier  bridge  (see  figure  63). 

output  voltage  is  varied  by  introducing  a  delay 
AC  voltage  zero  and  the  leading  edge  of  the  SCR 
•  An  MC3370  zero  voltage  crossing  detector  IC, 
he  application  module,  produces  a  current  pulse 
second  duration,  centered  about  each  AC  line 
.  This  current  pulse  is  transmitted,  via  an 
ator  (IC  CN)  and  an  inverter  with  a  Schmitt 
t  (IC  BV)  to  the  gate  of  timer  0  of  the  6253* 
t,  the  rising  edge  of  the  ZCD  pulse  precedes  the 
ge  zero  by  40  microseconds.  The  rising  edge  of 
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the  ZCD  pulse  causes  the  output  of  timer  zerc  to  fall  to  the 
logical  0  level;  disabling  the  SCR  circuit.  The  timer  then 
counts  the  incoming  1  MHz  clock  pulses,  counting  down  from 
the  program  stored  terminal  count,  until  zerc  is  reached. 

At  this  point  the  counter  output  rises  to  the  logical  1 
level.  This  rising  edge  is  detected  by  a  one  shot,  IC  AP, 
which  outputs  a  pulse  of  ten  microsecond  duration.  This 
pulse  is  transmitted  to  the  application  module  through 
optical  isolator  CP.  The  optical  isolator  output  transistor 
forms  a  darlington  pair  with  a  2N3904,  allowing  a  current 
pulse  to  flow  through  the  Hammond  61  OB  pulse  transformer. 

The  secondaries  of  the  pulse  transformer  provide  gate 
current  to  two  2N688  SCRs,  allowing  the  one  that  is 
presently  forward  biased  to  turn  on. 

If  at  this  point  in  time  both  SCRs  are  reverse  biased 
due  to  the  fact  that  the  armature  back  EMF  exceeds  the  line 
voltage,  neither  SCR  will  turn  on;  resulting  in  a  lost  power 
cycle.  IC  BL,  a  CMOS  Schmitt  trigger  input  inverter, 
together  with  its  related  resistor  and  capacitor,  forms  a  50 
KHz  square  wave  oscillator.  These  output  pulses  are  ANDed 
with  the  SCR  enable  signal  by  IC  BT.  The  resulting  pulse 
train  is  ORed  with  the  SCR  firing  pulse  originating  with  the 
one  shot  (IC  AP)  by  IC  BS.  Thus  if  the  SCR  is  not  fired  by 
the  original  trigger  pulse,  it  will  be  activated  by  the 
oscillator  output  as  soon  as  the  line  voltage  exceeds  the 
motor  back  EMF. 

A  switch  has  been  placed  in  series  with  the  unregulated 
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Figure  66  Application  Module  Power  Supply 


+15  volt  supply  (nominal  +20  volts)  feeding  the  SCR  firing 
circuit,  to  allow  the  system  user  to  quickly  deactivate  the 
SCR  system,  or  to  leave  it  disabled  during  program 
debugging. 

Figures  64  and  65  illustrate  typical  voltage  and 
current  waveforms  obtained  when  the  variable  duty  cycle 
SCR/diode  bridge  is  used  to  drive  a  DC  meter  armature.  The 
starting  voltage  and  current  waveforms  correspond  to  a  motor 
near  standstill,  thus  the  armature  back  FMF  is  negligible, 
allowing  the  armature  voltage  to  drop  to  zero  when  the  SCRs 
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are  disabled.  The  low  back  EMF  also  allows  maximum  armature 
current  to  flew.  Due  to  the  inductance  of  the  armature 
winding,  the  armature  current  continues  to  flow  through  the 
free  wheeling  diode  after  armature  voltage  returns  to  zero. 
Once  the  motor  RPM  increases,  the  effective  armature  voltage 
is  significantly  reduced  by  the  back  EMF,  resulting  in  a 
considerably  reduced  armature  running  current. 

The  Motor  Field  Supply 

A  diode  bridge,  consisting  of  1N4005  diodes,  has  been 
provided  to  rectify  the  120  V  AC  to  provide  a  motor  field 
supply.  A  1.5  amp  fuse  is  used  to  protect  these  diodes. 

Application  Module  Power  Supplies 

Plus  and  minus  15  volt  supplies  (see  figure  66)  provide 
the  regulated  DC  voltage  required  by  the  application 
module's  analog  and  digital  circuitry. 

The  analog  circuit  ground  in  the  application  module  is 
tied  to  the  AC  neutral  side  of  the  current  to  voltage 
transducer.  Thus  the  ground  potential  is  a  diode  forward 
voltage  drop  above  the  AC  line  neutral  potential.  This 
ground  reference  permits  the  filtering  and  conversion  of  tne 
analog  signal  without  having  to  compensate  for  a  large 
common  mode  input  voltage. 
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J.  Armature  Current  Sensor 

The  armature  current  transducer  consists  of  a  sensing 
resistor  in  series  with  the  armature.  The  voltage  across 
this  resistor  is  amplified,  filtered,  and  latched  in  a 
sample  and  hold  circuit.  The  latched  analog  voltage  is 
converted  to  an  8  bit  binary  number,  which  is  read  by  the 
microcompute  r. 
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The  Current  Sense  Amplifier  and  Filter 

Figure  67  illustrates  the  circuitry  used  to  amplify  and 
filter  the  signal  from  the  armature  current  transducer.  The 
armature  current  is  converted  to  a  voltage  using  a  meter 
shunt  specified  to  produce  a  50  mV  signal  if  a  five  amp 
current  is  passed  through  it.  The  100%  overload  rating 
allows  it  to  be  used  for  up  to  10  amps.  Input  voltage 
spikes  to  the  amplifier  circuit  are  clipped  at  plus  and 
minus  700  mV  by  the  two  1N4001  diodes.  Should  the  shunt 
circuit  accidentally  develop  an  open  circuit;  the 
application  cf  full  120  volt  DC  to  the  input  of  the 
operational  amplifier  is  prevented  by  these  diodes.  The 
diodes  will  limit  this  input  voltage  to  700  mV  until  the 
half  amp  fuse  opens,  isolating  the  analog  circuit  from  the 
voltage  source.  The  100  Kohm  resistor  on  the  operational 
amplifier  input  provides  a  ground  reference  for  zero 
armature  current. 

The  amplifier  has  a  gain  of  100,  thus  its  output 
voltage  corresponds  to  the  armature  current  in  amps,  with 
amplifier  saturation  taking  place  at  about  13  volts  peak 
(corresponding  to  13  amps  peak  armature  current) .  The  zero 
offset  voltage  for  the  entire  analog  circuit  is  trimmed  out 
using  the  10  Kohm  potentiometer  connected  to  the  amplifier 
IC.  A  scaling  factor  in  software  is  used  to  trim  the 
amplifier  gain.  Sample  current  waveforms  obtained  at  the 
output  of  the  amplifier  are  illustrated  in  figure  64  and  65. 

Before  conversion  to  a  binary  number,  the  rapidly 
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Figure  68 
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varying  amplifier  output  must  be  converted  to  a  DC  level 
proportional  to  the  average  value  of  the  armature  current. 
This  averaging  is  done  using  an  active,  low  pass,  unity  gain 
filter  [42]  with  a  rise  time  of  one  second.  The  resulting 
expected  maximum  variation  over  one  half  of  a  60  Hz  cycle  is 
estimated  to  be  60  mV;  compared  to  an  A/D  converter 
resolution  of  40  mV.  The  maximum  observed  variation  over 
half  of  a  60  Hz  cycle  is  in  the  order  of  30  mV.  The  delay 
introduced  by  this  filter  has  the  added  advantage  of 
smoothing  over  very  short  high  current  pulses,  preventing 
unnecessary  system  shut  down  by  the  digital  overcurrent 
monitoring  program. 

The  Sample  and  Hold  Circuit 

The  output  of  the  averaging  filter  is  fed  to  a  storage 
capacitor  through  a  junction  FET.  Under  normal  conditions, 
the  FET  is  in  the  low  resistance  state,  allowing  the 
capacitor  voltage  to  track  the  filter  output.  A  write 
instruction  to  the  proper  I/O  port  causes  Q*  of  IC  AL  (figure 
67)  to  become  a  logical  1,  causing  current  to  be  drawn  from 
the  gate  of  the  FET;  putting  the  channel  into  a  high 
impedance  mode.  The  voltage  stored  in  the  hold  capacitor, 
buffered  by  a  unity  gain  amplifier,  is  then  converted  by  the 
A/D  converter.  The  end  of  conversion  pulse,  EOC,  toggles  a 
flip  flop  when  the  analog  to  digital  conversion  is 
completed;  returning  the  FET  to  a  low  impedance  state  so 
that  the  hold  capacitor  voltage  can  continue  to  track  the 
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filter  output*  A  100  ohm  resistor  limits  the  capacitor 
charging  current  flowing  through  the  FET;  whereas  the  1  Kohm 
resistor  protects  the  unity  gain  amplifier  input  from  a 
current  surge  during  power  shutdown. 

Analog  to  Digital  Converter  Circuitry 

The  analog  to  digital  converter  (see  figure  68)  is 
operated  with  Vss  =  10  volts;  in  order  to  obtain  an  input 
range  of  0  to  10  volts;  rather  than  a  -5  to  +5  volt  input 
range.  A  bias  supply  and  the  10  volt  reference  is  generated 
from  the  +15  volt  supply  using  an  LM317.  A  one  shot,  IC  AP, 
is  used  to  stretch  the  start  conversion  pulse  from  IC  BP 
into  a  pulse  of  10  microsecond  duration.  This  pulse  is  then 
coupled  to  the  A/D  converter  through  optical  isolator  IC  CS. 
The  A/D  converter's  end  of  conversion  output  is  used  to 
enable  the  A/D  converter  data  outputs,  as  well  as  to  return 
the  sample  and  hold  circuit  to  the  sample  mode.  The  EOC 
signal  is  also  available  to  the  CPU  so  that  the  completion 
of  the  conversion  can  be  determined.  The  A/D  converter  data 
outputs  are  coupled  to  the  interface  board  data  bus  through 
optical  isolators  and  tristate  buffers. 
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Figure  69  Optical  Tachometer  System 

K.  Optical  Tachometer 

The  optical  tachometer  system  (see  figure  6  9)  provides 
a  system  interrupt  every  45  degrees  of  motor  shaft  rotation. 
The  output  of  the  existing  optical  interrupter  is  normally 
pulled  to  ground  by  the  16  Kohm  resistor.  When  the 
phototransistcr  receives  a  light  pulse  via  a  slot  in  the 
disc,  the  transistor  conducts,  pulling  the  output  high.  The 
resistor,  zener  diode  and  Schmitt  trigger  inverter  (IC  BL) 
shape  this  output  pulse.  IC  AT  then  buffers  this  signal 
onto  the  113  line,  activating  the  edge  triggered  interrupt, 

R ST  7.5,  of  the  8085.  This  interrupt  is  internally  latched 


until  it  is  serviced 


VI.  Software  Documentation 
The  system  software  is  divided  into  four  functional 
sections:  the  Keyboard  monitor,  the  floating  point 
arithmetic  package,  a  set  of  routines  to  allow  the 
microcomputer  system  to  be  used  as  a  calculator,  and  an 
application  module  consisting  of  a  DC  motor  speed  control 
program.  Figures  70  to  72  provide  a  general  breakdown  of 
memory  and  I/O  usage. 

Programming  Conventions 

Several  conventions  have  been  adopted  and  adhered  to  in 
order  to  produce  a  software  package  that  is  easy  to 
understand  and  modify,  yet  is  flexible  enough  to  be  of 
maximum  use. 

To  simplify  debugging  and  modification,  major  programs 
have  been  broken  down  into  functional  blocks.  Each  of  these 
blocks  performs  a  well  defined  operation  by  itself;  and 
being  a  subroutine,  is  capable  of  being  debugged  on  its  own. 
A  major  program  thus  consists  in  a  large  part  of  a  series  of 
pretested  subroutines,  greatly  simplifying  software 
modification  and  debugging. 

Since  software  will  be  stored  in  1024  byte  blocks  of 
read  only  memory,  the  source  code  should  be  structured  with 
this  maximum  block  size  in  mind  [40].  Thus,  the  program  is 
written  in  blocks,  each  of  which  will  fit  into  a  single  2708 
read  only  memory  chip.  Each  program  or  subroutine  that  is 
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Read 

Only 

Memory 

IC 

Me  mory 
Page 

(Decimal) 

Memory 

Address 

(Hexadecimal) 

Contents 

0 

0-3 

0000  -  03FF 

Keyboard  Monitor 

1 

4-7 

0400  -  07FF 

Floating  Point  Addition, 
Subtraction,  Multiplication 
and  Division 

2 

8-11 

0800  -  OBFF 

Decimal  to  Binary  and 

Binary  to  Decimal 

Conversion 

-5 

mJ 

12  -  15 

0C00  -  0FFF 

Calculator  Functions 

4-5 

16  -  23 

1000  -  17FF 

Motor  Control  Software 

6-7 

24-31 

1800  -  1 FFF 

Dnused 

Figure  70 

Memory  Map  -  Read  Only  Memory 

Random 

Access 

Memory 

Bank 

Me  mory 
Page 

(Decimal) 

Memory 

Address 

(Hexadecimal) 

Contents 

0 

32 

2000  -  2057 

Monitor  Program  Data 

0 

32 

2058  -  2066 

Application  Program  Data 

0 

32  -  33 

2067  -  2 1 FF 

Unused 

0 

34  -  35 

2200  -  23FF 

Reserved  for  Stack 

1 

36  -  39 

2400  -  27FF 

User  Workspace 

Figure  71 

Memory  Map 

-  Random  Access  Memory 
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referred  to  from  outside  its  block  has  a  'forwarding 
address'  located  at  a  fixed  location  at  the  beginning  of  the 
block  in  which  it  resides.  Any  external  reference  is  then 
made  to  the  fixed  location  of  this  'forwarding  address', 
rather  than  to  the  actual  starting  address  of  the  routine- 
As  a  result,  when  a  routine  is  modified,  addresses  within 
the  program  block  itself  are  readjusted,  but  the  location  of 
the  forwarding  address  remains  fixed.  Thus  when  a  change  is 
made,  only  the  IC  directly  affected  needs  tc  be 
reprogrammed;  all  external  addresses  referenced  to  the 
altered  memory  remain  fixed. 


A.  The  Keyboard  Monitor 

The  keyboard  monitor,  located  in  the  first  four  pages 
of  memory,  provides  the  operator  with  a  means  of  controlling 
the  activities  of  the  computer  system.  The  heart  of  the 
monitor  consists  of  a  routine  which  determines  which 
keyboard  switch  was  closed,  and  then  calls  the  appropriate 
subroutine  to  execute  the  desired  function.  These  monitor 
functions  include  routines  which  enable  the  user  to  read 
from  or  write  to  memory  locations  or  I/O  ports,  or  to 
initiate  program  execution  at  any  desired  address. 
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I/O  Port 
Address 
(Hexadecimal) 

Label 

I/O  Port 

04 

D827S 

Display  Data  Register 

05 

C8279 

Keyboard/Display  Control 
Register 

F0 

ADCO  1 

A/D  Converter  Data 

Output 

FI 

FFDAT 

Flip  Flop  Data 

F3 

TRS12 

RPM  Timer  Overrun  Reset 

F4 

LATSH 

Sample/Hold  Gate  Latch 

F6 

FPLED 

Front  Panel  LED  Array 

F7 

TRS1  1 

Interrupt  Reset;  Control 
Update  Timer 

FC 

TIM  10 

Timer  IC  1,  Counter 

0 

FD 

TIM  1  1 

Timer  IC  1 ,  Counter 

1 

FE 

TIM12 

Timer  IC  1,  Counter 

2 

FF 

TIM  1C 

Timer  IC  1 ,  Control 

Register 

Figure  72  Memory  Map  -  I/O  Ports 


Interrupt  Vectors 

A  signal  applied  to  one  of  the  interrupt  lines  of  the 
8085  will  result  in  the  processor  fetching  an  instruction 
from  a  predetermined  memory  location.  Jump  instructions  are 
stored  at  these  locations  which  then  pass  system  control  to 
the  routine  reguired  to  service  the  interrupting  device- 

The  reset  signal  will  cause  program  control  to  be 
transferred  to  the  reset  routine,  which  initializes  the 
microcomputer  system.  The  internal  interrupt,  RST  5.5, 
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initiates  the  execution  of  the  keyboard  service  routine. 

R  ST  7.5,  an  edge  triggered  interrupt  originating  in  the 
optical  tachometer  circuit,  requests  the  execution  of  the 
motor  control  program.  The  remaining  interrupt  vectors,  if 
accessed,  will  result  in  the  execution  of  an  error  exit. 


Error  Exits 

Throughout  the  software,  abnormal  conditions  are  tested 
for,  and  if  found  will  result  in  an  error  exit.  If  this 
occurs,  the  internal  registers  affected  by  the  exit  routine 
are  stored;  an  error  code  in  seven  segment  form  is  loaded 
into  the  HL  registers,  and  a  jump  is  executed  to  the  exit 
routine  via  a  ’forwarding  address’. 

In  the  exit  routine  itself,  the  error  code  is  displayed 
and  the  internal  CPU  registers  are  restored  to  the  state  in 
which  they  were  when  the  error  was  detected.  A  halt 
instruction  is  then  executed. 


System  Reset 


The  function  of  the  reset  routine  is  to  initiate  the 
operation  of  the  microcomputer  system  in  an  orderly  manner. 
The  location  of  the  top  of  the  stack  is  defined  to  be  23FF 
hex,  and  the  operating  mode  of  the  8279  keyboard/display 
interface  is  defined.  The  FIFO  register  and  the  display 
memory  in  the  8279  are  then  cleared.  Since  this  leaves  the 


display  RAM  inaccessible  during  the  clearing  operation,  the 
CPU  waits  until  it  is  completed.  The  display  clear 


r 

■„  J  .1  !  :■  -  •*  if*'  1  t’“e 


’ 

' 

■ 


106 


subroutine  is  then  called  to  clear  various  flags.  The 
interrupt  system  is  initialized  with  only  RST  5.  5  (the 
keyboard  interrupt)  active,  and  the  'forwarding  addresses' 
associated  with  the  auxiliary  functions  are  defaulted  to  an 
error  exit.  Program  control  is  then  transferred  to  an  idle 
loop  to  await  further  instructions.  Note  that  at  this  point 
the  SOD  line  is  reset.  In  general,  when  the  system  is 
executing  an  interrupt  initiated  function,  the  SOD  line  is 
set;  otherwise  it  is  reset.  This  allows  the  system  user  to 
determine  when  the  microcomputer  is  active  and  how  long  is 
required  to  perform  certain  functions,  by  simply  observing 
the  SOD  output  on  an  ocilloscope. 

The  Keyboard  Monitor  Routine 

The  keyboard  service  routine,  flowcharted  in  figure  73, 
enables  program  control  to  be  transferred  to  a  keyboard 
selected  subroutine.  An  interrupt  on  the  RST  5. 5  line 
results  in  a  subroutine  call  of  the  address  KBDST.  The 
CPU's  internal  registers  are  then  pushed  onto  the  stack;  the 
RST  5.5  interrupt  is  disabled  to  prevent  another  interrupt 
before  the  present  one  is  serviced;  and  the  data  byte 
corresponding  to  the  pushed  key  is  read  from  the  8279.  An 
offset  is  added  to  this  byte  to  indicate  whether  or  not  the 
function  flag  is  set;  resulting  in  the  function  code.  The 
function  code  is  a  unique  data  byte,  corresponding  to  the 
desired  function.  This  data  byte  is  compared  to  the  first 
byte  of  each  three  byte  record  stored  in  a  data  file.  If  a 
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jump  to  service  routine 
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Figure  73  Keyboard  Service  Bouti 

match  is  obtained,  the  second  two  bytes  of 
containing  the  address  of  the  desired  serv 
pushed  onto  the  stack,  along  with  the  addr 
routine.  The  microprocessor's  internal  re 
restored  to  their  preinterrupt  condition, 
call  to  the  desired  keyboard  service  routi 
The  subroutine's  return  statement  will  tra 
the  return  routine,  where  the  RST  5.5  inte 
for  the  next  key  operation.  The  microproc 
registers  are  returned  to  the  preinterrupt 
program  control  is  returned  to  the  routine 
key  operation. 

Two  error  exits  may  be  encountered  in 
this  program.  Error  code  2  is  the  result 
keyboard  element  for  which  no  service  rout 
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defined.  This  error  may  occur,  since  keys  have  been  left 
unassigned  for  future  applications.  Error  code  3  indicates 
that  the  end  of  the  lookup  file  was  reached  before  an  entry 
equal  to  the  function  code  was  found. 

The  Display  Clear  Routine 

This  keyboard  callable  routine  clears  the  display  and 
the  corresponding  memory  file,  as  well  as  setting  the 
pointer  to  the  leftmost  display  digit.  The  function  flag 
(FTNFL)  ,  data  flag  (DATAF)  ,  clear  flag  (CLRFI)  ,  and  the 
display  flag  (DISPF)  are  also  reset.  Internal 
microprocessor  registers  are  not  affected  by  this  routine. 

Data  Entry  Soutines 

Pressing  a  data  key  (0  to  F)  will  cause  the  digit  to 
appear  in  the  display,  while  its  hexadecimal  value  is  stored 
in  the  corresponding  memory  file  location.  Each  key  has  a 
unique  entry  point  (labels  BUT00  to  BUTOF) ,  where  the 
hexadecimal  digit  and  its  seven  segment  code  are  entered 
into  an  internal  microprocessor  register.  From  there  the 
program  jumps  to  DSPST,  the  beginning  of  the  program  common 
to  all  data  keys. 

The  clear  flag  is  tested,  and  if  set,  the  display  is 
cleared  'ey  calling  the  display  clear  routine.  The  display 
digit  counter  is  then  loaded  (DISCT) ,  and  used  as  an  offset 
tc  store  the  required  digit  in  the  proper  display  and  memory 
file  location.  The  display  digit  counter  is  then 
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decremented  and  tested.  If  the  new  display  digit  is 
positive  it  is  stored  in  memory,  otherwise  the  data/address 
flag  (DATAF)  is  loaded.  If  the  data/address  flag  is  set,  the 
display  digit  counter  is  reset  to  7,  otherwise  it  is  reset 
to  1  for  data  byte  modification.  The  new  display  digit 
counter  is  then  stored  in  memory. 

Lead  Address  Soutine 

This  keyboard  callable  routine  loads  a  four  digit 
hexdecimal  address,  packs  it  into  two  bytes,  and  stores  it 
in  the  HL  registers  of  the  microprocessor.  The  memory 
display  routine  is  then  called  to  display  the  contents  of 
the  addressed  memory  byte,  and  store  the  address  itself  in  a 
preassigned  memory  location.  Upon  return  to  the  load 
address  routine,  the  data  flag  (DATAF)  is  set  to  indicate 
that  the  next  entry  will  be  data.  The  display  digit  counter 
(DISCT)  is  set  to  one  so  that  entered  data  will  be  loaded 
into  the  data  field. 

Reading  and  Displacing  a  Mem ore  Location 

This  routine  loads  the  contents  of  the  memory  location, 
addressed  by  the  HL  pair,  into  the  B  register.  The  address 
is  then  stored  in  a  preassigned  memory  location,  starting  at 
ADDRL,  for  later  use.  The  data  byte,  now  in  the  B  register, 
is  unpacked  into  two  hex  digits,  which  are  converted  to 
their  seven  segment  code  and  output  to  the  two  rightmost 
display  locations.  The  two  address  bytes  are  also 
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displayed,  followed  by  a  dot  to  separate  them  from  the  data 
byte*  Conversion  to  seven  segment  code  is  done  using  the 
hex  to  seven  segment  conversion  routine. 

The  Memory  Write  Function 

The  ffirexaory  write  function,  a  keyboard  service  routine, 
loads  the  two  hex  digits  just  entered,  packs  them  into  a 
single  data  byte,  and  stores  this  byte  in  the  memory 
location  whose  address  is  stored  in  ADDRL  and  ADDRH  (least 
significant  byte  and  most  significant  byte  respectively) • 

The  addressed  memory  location  is  then  read  to  insure  that 
the  data  byte  was  properly  stored.  If  the  read  data  differs 
from  the  written  data,  an  error  message  is  displayed.  If 
the  proper  storage  of  the  data  byte  is  confirmed,  the 
address  now  stored  in  the  HL  pair  is  incremented,  and  the 
memory  display  subroutine  is  called  to  store  the  incremented 
address  in  memory,  and  display  it  along  with  the  data  byte 
presently  stored  at  that  location. 

The  Memory  Read  Function 

This  routine  services  the  memory  read  key.  The  data 
address,  stored  starting  at  ADDRL,  is  loaded  into  the  HL 
registers  and  incremented.  The  memory  display  routine  is 
then  called  to  store  the  new  address,  and  display  it  and  the 
data  byte  presently  stored  there. 
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The  Run  Rune ticn 

Depressing  the  R3N  key  causes  program  execution  to 
begin  at  the  previously  entered  address.  The  stack  pointer 
is  rolled  back,  to  permit  a  subroutine  return  from  the 
program  accessed  via  this  function  to  return  to  the  keyboard 
return  routine.  RST  5.5  is  then  enabled  and  SOD  is  cleared. 
Program  control  is  now  transferred  by  loading  the  desired 
address  frem  the  HL  register  pair  to  the  program  counter. 

Setting  the  Function  Flag 

The  function  key  (FTN)  is  serviced  by  this  routine.  A 
hexadecimal  number,  80,  is  loaded  into  the  A  register.  This 
number  is  then  stored  in  the  function  flag  (FT NFL)  location, 
to  be  later  used  as  an  offset  by  the  keyboard  service 
routine. 
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single  byte.  A  subroutine  to  read  the  desired  port  is  then 
written  into  RAM  and  executed,  resulting  in  the  contents  of 
the  desired  port  being  loaded  into  the  microprocessor's  A 
register.  The  port  data  display  routine  is  then  called  to 
display  the  port  address  and  its  contents. 
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Port  Data  Display 

This  routine  (starting  label  IDSST)  is  entered  with  the 
port  number  in  the  B  register,  and  its  contents  in  the  C 
register.  A  'P*  is  displayed,  followed  by  the  port  address 
and  a  dot.  This  is  then  followed  by  the  data  byte.  The 
hexadecimal  to  seven  segment  conversion  routine  is  called 
upon  for  the  required  conversions. 

The  I/O  Port  Write  Function 

The  I/O  port  write  key  (10  KB)  requests  the  execution 
of  this  routine.  The  two  address  nibbles  (a  nibble  consists 
of  four  bits)  are  loaded  into  internal  microprocessor 
registers  from  the  memory  file  corresponding  to  the 
displayed  data.  These  two  nibbles  are  then  packed  into  a 
single  nyte.  Similarly,  the  data  nibbles  are  then  loaded 
and  packed  into  a  single  byte.  A  subroutine  to  write  the 
data  to  the  required  port  address  is  then  loaded  into  BAM 
and  executed.  The  port  data  display  routine  is  then  called 
to  display  the  port  address  and  the  data  written  to  the 
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H exadecimal  to  Seven  Segment  Code  Conversion 

This  routine  converts  the  hexadecimal  digit  stored  in 
the  A  register  into  the  corresponding  seven  segment  code. 

The  hexadecimal  digit  is  added  to  a  base  address  to  access  a 
table  entry,  which  contains  the  required  seven  segment  code. 

The  Idle  Lcojg 

While  awaiting  further  instructions,  the  microcomputer 
executes  an  endless  idle  loop.  The  serial  data  output  is 
toggled  during  the  execution  of  this  loop,  enabling  a  quick 
oscilloscope  check  for  hardware  failure  of  the  basic 
microcomputer  system. 

The  Data  Block  Move  Routine 

This  routine  moves  a  data  block  from  one  starting 
address  to  an  ether.  The  source  starting  address  is  stored 
in  the  BC  register  pair;  the  destination  starting  address  is 
in  the  DE  pair;  and  the  number  of  bytes  to  be  moved  is  in 
the  H  register. 
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B.  The  Floating  Point  Arithmetic  Package 

The  floating  point  arithmetic  package,  residing  in 
memory  pages  4  to  11,  contains  the  necessary  software  to 
perform  binary  floating  point  multiplication,  division, 
addition  and  subtraction,  as  well  as  conversion  between 
floating  point  binary  and  decimal  numbers  [  43-44  J. 

Binary  Floating  Point  Number  Format 

All  floating  point  binary  numbers  are  expressed  in  the 
following  three  byte  format: 

S.MMM  MMMM  MMMM  MMMM  SEEE  EEEE 
The  mantissa  consists  of  a  sign  bit  (S)  and  a  15  bit 
mantissa  (M) ,  expressed  in  two's  complement  form.  The 
exponent  is  adjusted  such  that  the  magnitude  of  the  mantissa 
is  always  less  than  1.0,  but  larger  than  or  equal  to  0.5 
(decimal) .  The  exponent  consists  of  a  sign  bit  followed  by 
7  exponent  (E)  bits,  again  expressed  in  two's  complement 
form.  The  base  of  the  exponent  is  2. 

Floating  Point  Multiplication 

The  floating  point  multiplication  routine  loads  the  two 
binary  floating  point  numbers  to  be  multiplied  from  FPV1  and 
FPV2,  and  converts  them  to  positive  numbers  for 
multiplication.  The  sign  flag,  SIGNF ,  is  used  to  indicate 
the  polarity  of  the  resulting  product.  The  16  bit  binary 
multiplication  routine  is  then  called  to  perform  the  actual 
multiplication.  Due  to  the  format's  requirement  of  a  zero 
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Figure  74 


The  Floating  Point  Multiplication  Routine 


leading  bit  for  each  positive  mantissa,  a  prcduc 
obtained  with  two  leading  zeroes.  To  compensate 
the  product  is  shifted  one  bit  to  the  left.  The 
exponents  are  then  added,  and  tested  for  overflo 
underflow.  The  normalization  subroutine  is  then 
add  the  proper  sign  to  the  mantissa,  and  convert 
to  the  proper  format.  The  result  is  stored  in  F 
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Sixteen  Bit  Einary  Multiplication 

This  subroutine  multiplies  the  16  bit  integer  stored  in 
the  BC  register  pair  by  the  16  bit  integer  stored  in  the  D2 
register  pair.  The  multiplication  is  performed  by  sampling 
the  multiplier,  bit  by  bit,  starting  with  the  least 
significant  bit.  If  the  bit  is  a  one,  the  16  bit 
multiplicand  is  added  to  the  most  significant  16  bits  of  the 
product;  no  addition  is  performed  if  the  current  multiplier 
bit  is  a  zero.  The  multiplier  is  then  shifted  right  to  test 
the  next  bit;  while  the  product  is  shifted  right  one 
location  due  to  the  increased  power  of  two  represented  by 
the  next  multiplier  bit.  This  shifting,  testing  and  adding 
is  repeated  16  times,  once  for  each  multiplier  bit.  When 
completed,  the  multiplicand  added  (or  not  added)  to  the 
product  due  to  the  2°  bit  of  the  multiplier,  will  have  been 
shifted  to  the  least  significant  bits  of  the  product;  while 
the  addition  due  to  the  most  significant  multiplier  bit  will 
have  its  effect  felt  in  the  most  significant  product  bits. 
The  32  bit  product  is  then  stored  such  that  the  most 
significant  16  bits  are  in  the  HL  register  pair,  while  the 
16  least  significant  bits  are  in  the  DE  register  pair. 
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The  Normalization  Routine 

The  normalization  routine  converts  the  sign  flag, 
mantissa,  and  exponent  resulting  from  a  previous  operation 
into  a  valid  binary  floating  point  number.  The  incoming, 
positive,  four  byte  mantissa  is  stored  in  SH FT  1  to  SHFT4 
(most  significant  to  least  significant  byte)  with  the 
decimal  point  located  after  the  most  significant  bit  of 
SHF11.  The  two’s  complement  exponent  is  stored  in  SHFT5, 
and  the  sign  flag  (set  for  reset  for  ♦)  is  stored  in 
SIGNF. 

Entry  into  the  normalization  routine  is  defined  such 
that  the  incoming  mantissa  is  always  positive,  and  always 
less  than  one  in  magnitude.  If  a  zero  mantissa  is  detected, 
the  proper  floating  point  format  for  a  zero  is  stored, 
completing  the  function  of  this  routine.  If  the  mantissa  is 
not  zero,  it  is  shifted  left  until  its  magnitude  is  greater 
than  or  equal  to  0.5  (decimal),  and  less  than  1.0,  as 
required,  with  the  exponent  adjusted  accordingly.  When  of 
the  proper  magnitude,  the  mantissa  is  tested  to  determine  if 
roundup  is  required.  If  it  is  required,  the  proper  rounding 
operation  is  performed.  The  final  exponent  is  then  tested 
for  underflow.  If  an  error  is  detected,  error  code  6  is 
displayed,  otherwise,  the  sign  flag  is  loaded  and  tested. 

If  it  is  set,  the  two’s  complement  of  the  mantissa  is  taken. 
The  resulting  valid  floating  point  number  is  then  stored  in 
FPV2,  completing  the  normalization  routine. 


. 


121 


Floating  Point  Division 

This  routine  divides  a  binary  floating  point  dividend 
stored  in  FPV1  by  a  binary  floating  point  divisor,  stored  in 
FPV2.  The  dividend  and  divisor  mantissas  are  loaded  and 
converted  to  positive  quantities  if  required,  with  the  sign 
flag  adjusted  to  give  the  proper  quotient  sign.  The  divisor 
is  tested,  and  if  it  is  zero,  an  error  exit  is  performed, 
displaying  error  code  8. 

Division  then  proceeds  in  the  following  manner.  The 
divisor  is  subtracted  from  the  dividend.  If  the  result  is 
negative,  a  zero  is  shifted  into  the  least  significant 
quotient  bit.  If  the  result  of  the  subtraction  is  positive; 
the  dividend  is  replaced  with  the  remainder,  and  a  one  is 
shifted  into  the  least  significant  quotient  bit.  The 
dividend  is  then  shifted  one  bit  position  to  the  left,  the 
loop  counter  is  decremented,  and  the  process  is  repeated 
until  the  division  is  completed.  At  this  point  the 
remainder  is  tested,  and  the  quotient  is  rounded  up  if 
required. 

The  dividend  exponent  is  then  loaded  and  incremented  to 
compensate  for  the  extra  leading  zero  in  the  quotient.  If 
this  results  in  an  overflow,  an  error  exit  is  performend  and 
error  code  7  is  displayed.  The  divisor  mantissa  is 
subtracted  from  the  dividend  mantissa;  and  depending  on  the 
sign  of  the  mantissa,  overflow  or  underflow  are  tested  for. 
If  an  error  occurs,  error  code  9  (overflow)  cr  error  code  10 
(underflow)  are  displayed.  The  normalization  routine  is 
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then  called  to  convert  the  result  to  the  proper  format  and 
add  the  required  mantissa  sign.  The  final  quotient  remains 
stored  in  FPV2. 

Floating  Point  Addition 

The  floating  point  addition  routine  adds  the  binary 
floating  point  numbers  stored  in  FPV1  and  FPV2.  The  two 
exponents  are  loaded  and  compared  to  determine  which  is 
larger.  The  difference  in  the  exponents  is  also  tested,  and 
if  it  is  large  enough,  such  that  the  addition  of  the  smaller 
number  would  not  affect  the  least  significant  bits  of  the 
larger  number,  the  larger  number  is  stored  in  the  result 
location  (FPV2)  and  the  program  is  exited.  If  the  numbers 
are  within  range  of  each  other,  the  mantissa  of  the  smaller 
number  is  loaded  into  the  two  most  significant  bytes  of  a 
four  byte  workspace.  This  number  is  then  shifted  right  by  a 
number  of  bit  positions  equal  to  the  difference  in 
exponents.  An  extra  shift  is  then  executed  on  both 
mantissas  to  allow  room  for  an  overflow  bit.  There  are  two 
different  paths  though  the  program  for  the  above  steps, 
depending  on  which  input  variable  is  larger.  Shifting  is 
done  using  the  four  byte  shift  subroutines. 

The  two  mantissas,  now  normalized  to  the  same  exponent, 
are  added  using  a  32  bit  workspace  and  stored  in  SHFT1  to 
SHFT4  for  normalization.  If  the  mantissa  is  negative,  it  is 
cc nplement ed  and  the  sign  flag  is  set.  The  normalization 
routine  is  then  called  to  produce  a  valid  binary  floating 
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point  number,  which  is  stored  in  FPV2. 

Floating  Point  Subtraction 

This  routine  subtracts  the  minuend  stored  in  FPV2  from 
the  subtrahend  stored  in  FPV1.  This  is  accomplished  by 
taking  the  two’s  complement  of  the  minuend  mantissa  and 
calling  the  floating  point  addition  routine  to  add  the  two 
numbers.  The  difference  ends  up  in  FPV2  as  usual. 

The  four  By.t  e  shift  Routines 

The  four  byte  shift  left  routine  (FSLST)  and  the  four 
byte  shift  right  ^FSRST)  routine  will  shift  a  four  byte 
binary  number  one  bit  position  in  the  proper  direction.  The 
value  to  be  shifted  in  (a  one  or  a  zero)  is  stored  in  the 
carry  bit.  The  two  most  significant  bytes  are  stored  in  the 
HL  register  pair,  while  the  two  least  significant  bytes  are 
stored  on  top  of  the  stack,  both  going  into  the  subroutine 
and  returning  from  it. 

Floating  Point  Decimal  to  Binary  Conversion 

This  decimal  to  binary  conversion  routine  converts  the 
floating  point  decimal  number  stored  in  DECV1  to  DEC V8  into 
a  floating  pcint  binary  number.  The  mantissa  sign  byte  is 
leaded;  if  it  is  set,  the  sign  flag  is  also  set.  A  decimal 
digit,  starting  with  the  most  significant  one,  is  then  added 
to  the  workspace.  The  workspace  is  then  multiplied  by  10 
using  binary  shifts  and  addition.  This  process  is  repeated 
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until  the  last  decimal  digit  is  encountered.  This  digit  is 
only  added,  with  nc  multiplication  being  performed.  In  this 
manner,  the  mantissa,  treated  as  a  decimal  integer,  is 
converted  into  a  binary  integer.  This  binary  integer  is 
then  stored,  along  with  a  binary  exponent  which  accounts  for 
the  binary  point's  location  to  the  right  of  the  least 
significant  bit.  The  normalization  routine  is  then  called 
to  convert  the  mantissa  into  the  proper  format.  Up  to  this 
point,  the  position  of  the  decimal  point  has  been  assumed  to 
be  to  the  right  of  the  least  significant  decimal  digit. 

Since  this  is  not  the  case,  the  binary  mantissa  is 
multiplied  by  0.001  (decimal)  to  compensate  for  this.  The 
decimal  exponent  sign  and  magnitude  are  then  loaded.  If  the 
decimal  exponent  is  positive,  the  binary  number  is 
multiplied  by  10  and  the  decimal  exponent  is  decremented. 
This  process  is  repeated  until  the  least  significant  decimal 
exponent  digit  is  zero.  The  binary  number  is  then  * 
multiplied  by  100  as  the  most  significant  decimal  exponent: 
digit  is  decremented;  again  until  the  most  significant 
decimal  digit  is  zero.  If  the  decimal  exponent  is  negative, 
multiplication  of  the  binary  number  by  0.1  and  0.01 
(decimal)  is  used  to  account  for  the  decimal  exponent.  Once 
the  conversion  is  completed,  the  resulting  binary  floating 
point  number  is  stored  in  FPV2. 

These  binary  to  decimal  and  decimal  to  binary 
conversion  routines  are  generally  an  order  of  magnitude 
slower  than  the  ether  floating  point  routines  described 
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previously.  This  delay  however  does  not  result  in  any  timing 
problems,  as  the  conversion  routines  are  only  used  for 
microcompu ter/ope rat or  interfacing. 

Floating  Point  Binary  to  Decimal  Conversion 

This  routine  converts  the  binary  floating  point  number, 
stored  in  FPV2,  into  a  decimal  floating  point  number, 
storing  it  in  DECV.  The  binary  mantissa  is  tested;  if  it  is 
zero,  a  decimal  zero  is  output  and  the  routine  is  exited. 
Otherwise  the  binary  exponent  is  leaded,  incremented  to 
compensate  for  the  mantissa  sign  bit,  and  tested.  One  of 
two  paths  is  then  taken.  If  the  binary  exponent  is 
positive,  the  decimal  exponent  is  incremented  and  the  binary 
number  is  multiplied  by  0.1  (decimal).  This  is  repeated 
until  the  binary  exponent  is  no  longer  greater  than  zero. 

If  the  binary  exponent  is  negative,  the  second  path  is 
taken.  The  decimal  exponent  is  decremented  and  the  binary 
number  is  multiplied  by  10  (decimal) ,  until  the  binary 
exponent  is  non  negative.  At  this  point,  the  binary  number 
and  the  corresponding  decimal  exponent  obtained  before  the 
last  cycle  through  the  loop  are  retrieved,  such  that  a 
binary  exponent  is  obtained  which  is  as  close  to  zero  as 
possible,  but  not  greater  than  zero. 

Once  one  of  the  two  above  operations  has  been 
performed,  the  binary  mantissa  is  loaded  and  tested.  If  it 
is  negative,  it  is  complemented  and  a  sign  flag  is  set  in  an 
internal  register.  The  binary  exponent  is  then  tested.  If 
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the  exponent  is  non  zero,  it  is  incremented  and  the  binary 
mantissa  is  shifted  one  bit  position  to  the  right.  This  is 
repeated  until  the  binary  exponent  is  zero. 

The  decimal  exponent  is  then  stored,  the  decimal 
mantissa  sign  byte  is  output,  and  the  decimal  mantissa  is 
calculated  from  the  shifted  binary  mantissa  as  follows.  The 
binary  mantissa  is  now  effectively  a  binary  number  less  than 
1.0,  with  the  binary  point  moved  to  the  left  of  the  most 
significant  bit  by  earlier  incrementing  the  binary  exponent. 
If  this  binary  number  is  multiplied  by  10  decimal  using 
binary  shifting  and  addition,  an  overflow  between  0  and  9 
(decimal)  results.  This  technique  is  used  to  shift  out  five 
decimal  digits,  resulting  in  a  decimal  number  less  than  1.0, 
but  equal  to  the  original  binary  fraction.  If  the  leading 
decimal  digit  is  a  zero,  an  other  digit  is  shifted  out  and 
the  stored  decimal  exponent  is  decremented.  The  fifth 
decimal  digit  is  then  used  to  determine  if  the  fourth  digit 
should  be  rounded  up.  If  the  roundup  is  performed  and 
results  in  a  decimal  overflow,  1.000  is  loaded  and  the 
stored  decimal  exponent  is  incremented.  At  this  point  DECV 
contains  the  proper  decimal  mantissa  digits. 

The  decimal  exponent  is  then  loaded  and  decremented  to 
place  the  decimal  point  to  the  right  of  the  most  siginficant 
digit.  If  the  decimal  exponent  is  negative,  it  is 
complemented  and  the  sign  byte  is  loaded  with  the  minus  sign 
code.  The  decimal  exponent  in  binary  form  is  then  converted 
to  binary  coded  decimal  form,  using  the  BCD  add  instruction. 
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If  an  overflow  error  occurs  during  this  process,  error  exit 
1 4  is  performed.  Once  the  BCD  form  of  the  decimal  exponent 
is  obtained,  it  is  unpacked  into  two  hexadecimal  digits  and 
stored  in  the  DECV  file;  completing  the  floating  point 
binary  to  decimal  conversion. 


C.  Calculator  Routines 

The  calculator  routines,  which  enable  the  CPU  system  to 
be  used  as  a  four  function  calculator,  occupy  memory  pages 
12  to  15.  Keyboard  accessible  functions  are  included  to 
enter  numbers  into  the  Y  register;  to  add,  subtract, 
multiply  and  divide;  to  convert  from  decimal  to  hexadecimal; 
to  exchange  the  X  and  Y  registers;  and  to  store  and  recall 
numbers. 


The  Y  Hecjist er  Lead  Function 

This  routine  services  the  LDY  key.  Upon  entry,  the 
floating  point  workspace  is  stored  using  the  workspace  save 
routine.  This  is  done  in  order  to  avoid  problems  resulting 
from  the  nonreentrant  nature  of  the  floating  point 
arithmetic  routines.  The  function  flag  is  cleared,  and  the 
decimal  data  entry  routine  is  called  to  move  the  entered 
decimal  data  from  the  display  file  to  DECV,  storing  it  in 
the  proper  format.  The  decimal  to  binary  conversion  routine 
is  then  called  to  convert  the  decimal  data  stored  in  DECV 
into  the  corresponding  floating  point  binary  number.  The 
resulting  binary  number  is  then  moved  to  the  Y  register 
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(YEEG)  using  the  blockmove  routine.  To  confirm  the  proper 
entry  and  conversion  of  the  data,  the  decimal  data  display 
routine  is  called  to  display  the  just  entered  number.  The 
workspace  restore  routine  is  then  called  to  restore  the 
microprocessor's  internal  registers  and  the  contents  of  the 
memory  locations  affected  by  the  floating  point  arithmetic 
routines. 

The  Decimal  Data  Entry  Routine 

This  subroutine  loads  the  entered  floating  point 
decimal  number  from  the  memory  file  corresponding  to  the 
system  display,  DDAT ,  and  stores  it  in  the  DECV  file  in  the 
proper  format.  The  first  character  is  loaded  from  the  DDAT 
file.  If  it  is  a  minus  sign  flag,  it  is  stored  in  DEC VI ; 
otherwise  DECV 1  is  cleared  to  indicate  a  positive  mantissa, 
and  the  first  digit  is  loaded  into  DECV2.  Op  to  four 
mantissa  digits  are  entered  into  DECV2  to  DECV5^  The  end  of 
the  mantissa  string  is  determined  in  one  of  the  following 
ways.  If  four  mantissa  digits  have  been  entered,  the  next 
character  is  assumed  to  be  either  the  exponent  sign  or  the 
first  exponent  digit.  A  mantissa  with  less  than  four 
significant  digits  is  indicated  if  a  minus  sign  flag  or  a 
hexadecimal  •£•  is  encounterd  while  reading  a  mantissa 
digit.  If  this  occurs,  the  remaining  mantissa  digits  in 
DECV  are  set  to  zero;  and  the  proper  sign  flag  (-  for  minus 
sign  flag,  +  for  E)  is  entered  into  the  exponent  sign 
location,  DECV6.  If  a  four  digit  mantissa  is  used  and  no 
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exponent  sign  is  encountered,  the  exponent  is  assumed  to  be 
positive.  The  character  following  the  fourth  mantissa 
digit,  or  the  exponent  sign  if  one  exists,  is  taken  as  the 
single  digit  exponent  magnitude,  and  is  stored  in  DECV8. 
DECV7  is  cleared,  as  a  two  digit  decimal  exponent  will  not 
be  used. 

The  Decimal  Data  Display  Routine 

The  decimal  data  display  routine  takes  the  floating 
point  number  stored  in  the  DECV  file,  converts  it  to  the 
proper  format,  and  sends  it  out  to  the  system's  display. 

The  clear  flag  is  set,  such  that  the  depression  of  any  data 
key  will  clear  the  display  and  display  the  entered  data. 

The  exponent  magnitude  is  then  entered  from  DECV7  and  8.  If 
it's  magnitude  is  greater  than  9,  error  code  15  is  entered 
and  an  error  exit  is  performed;  otherwise  the  exponent  is 
converted  to  the  corresponding  seven  segment  code  (using  the 
seven  segment  conversion  routine)  and  sent  to  the  display. 
The  exponent  sign  is  then  displayed  (as  a  -  sign  or  a 
blank),  preceded  by  an  'E'.  The  decimal  mantissa  is 
displayed,  preceded  by  a  sign  if  required,  and  the 

decimal  point  is  entered  to  the  right  of  the  most 
significant  digit. 
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The  Change  Sign  Function 

This  routine  clears  the  function  flag,  then  loads  the 
minus  sign  code  and  its  seven  segment  equivalent  into  the  BC 
register  pair.  The  display  routine  (DSPST)  is  then  called 
to  output  the  seven  segment  code  to  the  display,  and  load 
the  data  byte  into  the  corresponding  memory  file,  DD AT. 

Decimal  to  Hexadecimal  Conversion 

Entered  numbers  are  stored  in  internal  memory  locations 
as  floating  point  binary  numbers.  The  decimal  to 
hexadecimal  conversion  routine  takes  the  binary  number 
stored  in  the  Y  register,  unpacks  the  three  bytes  into  six 
hexadecimal  digits,  and  outputs  them  to  the  display.  The 
hex  to  seven  segment  conversion  routine  is  used  for  the 
required  conversions. 

X  and  Y  Register  Exchange 

This  routine  clears  the  function  flag,  then  exchanges 
the  contents  of  the  X  (XREG)  and  Y  (YREG)  registers.  The 
new  variable  stored  in  the  X  register  is  converted  to 
decimal  using  the  binary  to  decimal  conversion  routine. 

This  number  is  then  displayed  using  the  decimal  data  display 
routine.  Since  the  floating  point  workspace  area  is 
affected  by  this  routine,  it  is  saved  at  the  start  and 
restored  at  the  end  of  the  routine,  using  the  subroutine 


provided  for  this  purpose 
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Calculator  Multiplication^  Division,  Addition  and 
Subtraction  Functions 

These  four  keyboard  service  routines  (labels  CMULS, 
CDIVS,  CADCS  and  CSUBS)  are  all  identical  except  for  the 
floating  point  arithmetic  routine  called  to  perform  the 
calculation.  The  workspace  save  routine  is  called  to  store 
affected  registers  and  memory  locations,  then  the 
calculation  start  routine  is  called  to  move  the  contents  of 
the  Y  register  to  FPV1  and  load  the  converted  data  from  the 
display  file  to  FPV2,  The  proper  arithmetic  routine  is  then 
called  to  store  the  result  in  the  Y  register,  convert  it  to 
decimal  number  and  display  it.  The  workspace  restore 
routine  is  then  called  to  restore  the  affected  internal 
registers  and  memory  locations  to  their  initial  contents. 

The  Calculator  Function  Start  Routine 

This  routine  clears  the  function  flag,  then  calls  the 
decimal  data  entry  routine  (DENST)  to  load  the  decimal 
number  from  the  memory  display  file  to  the  DFCV  file.  The 
decimal  to  binary  conversion  routine  is  then  called  to 
convert  the  decimal  number  into  a  floating  point  binary 
number.  This  new  binary  number  is  then  stored  in  the  X 
register,  as  well  as  in  FPV2,  while  the  content  of  the  Y 
register  is  moved  no  FPV1  using  the  data  block  move  routine. 
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The  Calculator  Function  End  Routine 

This  routine  moves  the  result  of  the  calculation  to  the 
Y  register  using  the  data  block:  move  routine.  The  binary  to 
decimal  conversion  routine  is  then  called  to  convert  the 
result  to  a  decimal  number,  which  is  output  by  the  decimal 
data  display  routine. 

The  Floating  Point  Workspace  Save  Function 

Since  this  routine  manipulates  the  stack  pointer,  the 
interrupt  system  is  disabled  upon  entry  and  reenabled  at  the 
end  of  the  routine.  The  return  address  on  top  of  tne  stack 
and  the  HL  register  pair  are  exchanged,  then  the  other 
internal  CPU  registers  are  pushed  onto  the  stack.  Memory 
locations  affected  by  the  floating  point  routines  (referred 
to  as  the  floating  point  workspace)  are  also  pushed  onto  the 
stack.  A  subroutine  return  is  simulated  by  transferring  the 
return  address  from  the  KL  register  to  the  program  counter. 

The  Floating  Point  Workspace  Restore  Routine 

This  routine  disables  the  interrupt  system,  pops  the 
return  address  from  the  stack,  then  restores  the  workspace 
and  internal  register  data  stored  on  the  stack.  The 
interrupts  are  then  reenabled,  the  return  address  is 
returned  to  the  stack,  and  a  return  instruction  is  executed. 
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The  Data  Store  Function 

This  routine  services  the  data  store  key.  The  function 
flag  is  cleared,  and  the  memory  register  (0  to  9)  is  entered 
from  the  DDAT  file.  If  the  register  number  is  out  of  range, 
error  code  1 1  is  displayed;  otherwise  the  register  number 
is  used  to  offset  a  base  address.  The  Y  register  is  then 
stored  in  this  memory  location,  the  display  is  cleared  using 
the  clear  subroutine,  and  the  program  is  exited. 

Th§  Data  Recall  Function 

This  routine  recalls  data  stored  by  the  above  program. 
If  the  requested  memory  register  is  out  of  range,  error  code 
1 2  is  displayed;  otherwise  the  data  is  copied  to  FPV2.  The 
binary  to  decimal  conversion  and  decimal  data  display 
routines  are  then  used  to  display  the  recalled  number.  The 
recalled  number  is  also  moved  to  the  DDAT  file;  thus  if  the 
recall  is  followed  by  an  arithmetic  function  key,  it  will 
appear  that  the  recalled  number  was  actually  stored  in  the  X 
register. 

Since  the  floating  point  workspace  is  affected  by  this 
routine,  the  workspace  is  saved  at  the  beginning  of  the 
routine,  and  restored  at  completion. 
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D .  Motor  Control  Software 

The  following  routines,  located  in  memory  pages  16  to 
23  (decimal)  allow  the  microprocessor  system  to  be  used  as  a 
DC  motor  speed  controller.  The  routines  are  written  in  a 
modular  manner  to  simplify  modification  for  ether 
applications. 

The  Applicat ion  Module  Initialization  Routine 

This  routine  is  called  to  initialize  the  application 
package,  using  the  monitor  load  address  and  run  fuctions. 

The  run  flag  (RUNFL)  is  cleared  to  disable  the  motor  control 
output,  and  the  SCR  controlling  timer  is  initialized  such 
that  the  SCR • s  are  disabled.  The  sample  interval  counter 
and  the  motor  control  setpoints  and  gain  constants  are 
loaded  with  default  values,  as  per  figiure  44,  using  the 
data  block  move  routine.  The  auxiliary  function  stepping 
stones  are  then  set  such  that  AFO  stops  the  motor;  AF1 
starts  the  motor;  and  AF2  displays  the  frequency  of  the 
power  mains.  Eefore  exiting  the  routine,  the  display  is 
cleared  using  the  clear  routine. 
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The  Motor  Start  Function 

The  motor  start  routine  clears  the  function  flag,  and 
tests  if  a  valid  entry  exists  for  the  maximum  allowable 
steady  state  current;  the  RPM  setpoint;  and  if  at  least  one 
of  the  two  control  algorithm  gain  constants  is  non  zero.  If 
one  of  the  above  conditions  is  not  met,  a  corresponding 
error  message  is  displayed,  otherwise  execution  of  the 
routine  is  continued.  The  time  average  current  (MEM02)  and 
the  old  integral  control  value  (CVIC)  are  set  to  zero.  The 
motor  run  flag  (RUNFL)  is  then  set,  and  the  SCR’s  are  turned 
full  on  by  entering  a  2.0  and  calling  the  control  output 
routine.  The  control  update  interrupt  ( RST  7. 5)  is  enabled, 
and  the  sample  interval  counter  location  (INTCT)  is 
initialized  using  the  number  stored  in  ICIN7. 

Motor  Control  Update 

This  routine  is  periodically  called  by  the  tachometer 
interrupt  service  routine  to  update  the  duty  cycle  of  the 
SCR  circuit.  Upon  entry,  the  RPM  setpoint  is  tested,  and  if 
zero,  the  motor  stop  routine  is  called  and  the  control 
update  program  is  exited.  Otherwise,  a  series  of 
subroutines  is  called  to  read  the  system  RPM  (RPM  read 
routine);  calculate  the  new  control  output  (control  output 
routine) ;  and  test  for  armature  overcurrent  (the  current 
test  routine).  The  sample  interval  counter  is  then 
reinitialized  and  the  internal  registers  and  the  floating 
point  workspace  are  restored. 


136 


The  Current  Test  Routine 

Instantaneous  and  I2t  overcurrent  are  tested  for  by 
this  routine.  The  current  read  routine  is  called  to  read 
the  A/D  converter.  This  current  is  then  divided  by  5  (since 
an  instantaneous  current  of  five  times  the  steady  state 
limit  is  allowed)  and  the  result  is  compared  to  the  steady 
state  current  limit  stored  in  MEM08.  If  the  instantaneous 
limit  is  exceeded,  error  code  24  is  loaded  and  an  error  exit 
is  performed.  If  the  present  current  is  belcw  the 
instantaneous  limit,  the  present  position  relative  to  the 
I2t  curve  is  calculated.  If  this  limit  is  exceeded,  error 
exit  25  is  performed;  otherwise  program  control  is  returned 
to  the  control  update  routine.  An  error  exit  in  this 
routine  will  also  call  the  motor  stop  routine. 

Calculation  of  the  Control  Output 

This  routine  loads  the  RPM  setpoint  and  subtracts  from 
it  the  present  system  RPM  stored  in  FPV2.  The  integral  gain 
constant  is  tested.  If  it  is  zero,  the  integral  control 
value  (C VIC)  is  also  set  to  zero;  otherwise  the  error  is 
multiplied  by  the  integral  gain  constant  and  added  to  the 
old  integral  control  variable  (CVIC) .  The  result  is  then 
tested;  if  it  is  less  than  zero  or  greater  than  2.0,  it  is 
clipped  at  the  proper  limit.  This  is  then  stored  in  CVIC  to 
be  added  to  the  proportional  control  value,  as  well  as  being 
used  as  the  old  integral  control  value  at  the  next  sample 
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interval. 

The  proportional  gain  constant  is  tested,  if  it  is 
zero,  only  the  integral  control  value  is  output.  If  the 
proportional  gain  constant  is  non  zero,  the  proportional 
control  output  is  calculated.  The  proportional  control 
output  is  then  added  to  the  integral  control  output  stored 
in  CVIC.  The  final  result  is  left  in  FPV2. 

The  Control  Voltage  Output  Routine 

This  routine  takes  the  control  value  stored  in  FPV2  and 
tests  it.  If  the  output  is  zero  or  negative,  the  SCR's  are 
turned  off  and  the  program  is  exited;  whereas  if  the  control 
output  is  greater  than  or  egual  to  2.0,  the  SCR's  are  turned 
full  on,  completing  this  routine. 

A  control  output  between  these  limits  is  converted  to 
the  required  duty  cycle  count  as  follows.  If  the  exponent 
of  the  control  output  is  egual  to  1,  the  positive  binary 
mantissa  is  shifted  one  bit  position  to  the  left.  A 
negative  exponent  is  brought  to  zero  by  shifting  the 
mantissa  to  the  right  and  incrementing  the  exponent  until  it 
is  zero.  This  results  in  a  binary  mantissa  with  a  value 
less  than  2.0  (decimal)  and  an  exponent  egual  to  zero. 
Interpolation  is  then  used  to  obtain  from  this  number,  a  16 
bit  integer  corresponding  to  the  number  of  microseconds 
which  must  intervene  between  the  voltage  zero  and  the 
enabling  of  the  SCR's. 

The  most  significant  three  bits  of  the  adjusted  control 
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output  mantissa  are  used  to  select  one  of  eight  table 
entries.  Each  entry  consists  of  a  16  bit  base  integer  and  a 
16  bit  scaling  factor.  The  three  most  significant  bits  of 
the  adjusted  control  output  mantissa  are  masked  off  and  the 
mantissa  is  shifted  three  bit  positions  to  the  left,  forming 
a  scaling  fraction  which  is  multiplied  by  the  scaling 
factor,  using  the  16  bit  binary  multiplication  routine.  If 
the  scaling  fraction  is  interpreted  as  a  number  less  than 
1.0,  and  the  scaling  factor  is  a  16  bit  integer,  then  the  16 
most  siginficant  bits  of  the  32  bit  integer  product  can  be 
interpreted  as  a  16  bit  integer.  This  product  integer  is 
then  subtracted  from  the  base  count  to  give  the  proper  16 
bit  SCR  delay  count.  This  count  is  latched  in  the  timer 
chip,  and  will  be  used  until  it  is  updated. 

The  Motor  Step  Routine 

This  routine  clears  the  function  flag,  the  motor  run 
flag,  and  disables  the  SCR  controlling  counter. 

The  RPM  Conversion  Routine 

The  RPM  conversion  routine,  enters  a  16  bit  count 
(RPMCT)  corresponding  to  the  number  of  microseconds  elapsed 
between  interrupts  originating  from  the  optical  tachometer 
system.  The  count  is  tested,  and  if  overrun  has  occurred, 
0.0  RPM  is  loaded  to  memory  and  the  routine  is  exited.  If 
the  count  is  valid,  it  is  complemented,  as  the  counter  is  a 
down  counter.  The  count  is  then  incremented  by  8  to 
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compensate  for  the  difference  between  the  interrupt  to 
counter  initialization  delay,  and  the  interrupt  to  counter 
latching  delay.  The  result  is  then  normalized  to  produce  a 
floating  point  binary  number,  equal  to  the  number  of 
microseconds  required  for  the  motor  shaft  to  rotate  through 
45  degrees.  The  system  RPM  is  then  calculated  by  dividing 
7.5  x  106  by  this  count,  with  the  result  stored  in  FPV2  and 
MEM07. 


The  SCR  Current  Conversion  Routine 

The  current  conversion  routine  reads  the  A/D  converter 
and  scales  the  resulting  number  to  produce  a  binary  floating 
point  number  equal  to  the  armature  current  in  amps. 

The  sample  and  hold  gate  is  latched.  After  a  delay  to 
allow  the  optical  isolators  and  the  hold  capacitor  voltage 
to  settle,  a  start  conversion  pulse  is  output.  A  delay  loop 
gives  the  returning  signal  from  the  end  of  conversion  output 
on  the  A/D  converter  a  chance  to  go  to  the  zero  state.  The 
microcomputer  then  waits  for  the  end  of  conversion  signal  to 
go  high,  indicating  that  the  conversion  is  complete.  A 
further  delay  is  added  to  ensure  all  optical  isolators  on 
the  incoming  data  lines  have  had  a  chance  to  settle.  The  8 
bit  data  word  is  then  read,  and  converted  into  a  valid 
floating  point  number  using  the  normalization  routine.  It 
is  then  multiplied  by  a  scaling  factor,  such  that  FF 
(h  exadecimal)  returned  from  the  A/D  converter  corresponds  to 
10.0  (decimal)  amps. 
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Optical  Tachomete i  Interrupt  Service  Routine 

The  optical  tachometer  system  generates  an  interrupt 
every  eighth  of  a  revolution  of  the  motor  shaft.  These 
interrupts  are  serviced  by  the  optical  tachometer  interrupt 
routine . 

This  program  keeps  track  of  the  number  of  interrupts 
using  a  down  counter.  When  the  count  reaches  1 ,  a 
timer/counter  is  started  to  measure  the  time  interval  to  the 
next  interrupt.  At  the  next  interrupt,  this  interval  count 
is  used  to  calculate  the  system  RPM,  and  update  the  motor 
control  output  voltage.  The  down  counter  is  then 
reinitialized  for  the  next  sample  interval.  Figure  75 
illustrates  the  program  using  a  Warnier-Orr  diagram  [45-46]. 

The  Line  Frequency  Monitor  Routine 

This  program  can  be  accessed  using  AF2,  once  the 
application  module  initialization  routine  has  been  executed. 
The  display  and  function  flag  is  cleared,  and  all  maskable 
interrupts  are  disabled.  The  wait  subroutine  is  then  called 
to  wait  for  the  rising  edge  of  a  zero  crossing  detector 
pulse.  The  timer/counter  is  then  initialized  and  the 
following  ZCD  pulses  are  counted.  On  the  rising  edge  of  the 
twentieth  pulse,  the  counter  is  latched  and  its  contents  are 


read. 


. 

. 


■ 

. 
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enter 

save  internal 
registers 

set  SOD, 
mask  RST  7. 5 

enable  other 
interrupts 

load,  decrement 
and  store 
interrupt  counter 


if  counter  =  0 


read  counter 
overrun  flag 

overrun  has 
occurred 


© 


overrun  has 
not  occurred 

call  control 
output  update 
subroutine 

clear  SOD, 
reenable  RST  7. 5 


load  overrun 
code  to  RPMCT 


load  RPM 
count  to  RPMCT 


if  counter  =  1 


restore  internal 
registers 


restart  RPM 
counter 

reset  counter 
overrun  flag 

clear  SOD, 
reenable  RST  7. 5 


return 


Figure  75 


Optical  Tachometer  Interrupt  Service  Routine 


. 
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The  count  is  then  complemented  and  normalized  before  being 
divided  into  1-0  x  106  to  obtain  the  frequency  of  the  power 
grid.  This  value  is  then  displayed  using  the  binary  to 
decimal  conversion  and  decimal  data  display  routines- 


VII.  Summary  and  Conclusion 

A  microcomputer  system,  useful  for  digital  machine  control 
applications,  has  been  presented.  This  system  consists  of 
several  hardware  and  software  modules  which  can  be  readily 
reconfigured  to  allow  the  system  to  be  used  for  various 
digital  machine  control  applications. 

The  present  system  is  configured  as  a  DC  motor  speed 
control  device.  The  control  software  consists  of  a 
proportional  plus  integral  control  program,  complemented  by 
an  armature  current  monitoring  program.  The  controller  to 
machine  interface  consists  of  a  programmable,  variable  duty 
cycle,  SCR  rectifier  which  provides  the  motor  armature 
voltage.  A  current  transducer  allows  the  armature  current 
to  be  monitored.  An  optical  tachometer  system  allows  the 
actual  shaft  RPM  to  be  determined,  providing  the  required 
feedback  to  the  controller. 

The  operation  of  the  system  has  been  tested  by 
recording  the  RPM  versus  time  characteristics  for  various 
proportional  gain,  integral  gain,  and  sample  interval 
values.  These  recordings  were  taken  during  motor  startup 
conditions,  .and  during  load  and  RPM  setpoint  changes.  These 
changes  were  made  under  software  control,  while  the  motor 
was  running. 

The  keyboard  monitor  system  permits  rapid  modification 
of  control  parameters,  thus  making  the  DC  motor  speed 
control  system  a  valuable  tool  for  gaining  an  insight  into 
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the  effects  of  various  combinations  of  control  parameters  on 
the  system's  response.  This  system  readily  lends  itself  to 
use  as  a  motor  speed  control  demonstration  system.  It  is 
also  easily  expanded  into  a  digital  synchronous  generator 
excitation  controller  for  power  system  stability  studies. 

It  is  hoped  that  this  device  will  become  a  useful  addition 
to  the  research  tools  available  to  the  Department  of 
Electrical  Engineering. 
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Appendix  A  System  Software  Listing 
This  section  consists  of  an  assembled  listing  of  all 
system  software,  formated  in  the  following  manner.  The 
first  four  hexadecimal  digits  constitute  the  memory  address 
of  the  first  byte  of  the  following  opcode  or  data  field. 

The  address  field  is  followed  by  two  to  eight  opcode  or  data 
digits  (representing  one  to  four  bytes) .  If  the  line 
contains  a  label,  it  occupies  the  next  five  character 
locations,  followed  by  a  colon.  The  opcode  menomic  starts 
in  column  19,  followed  by  the  operand  if  one  is  required. 
Column  32  contains  the  first  character  of  the  comment  field. 


A.  Address  and  Label  Definitions 

In  the  following  lines,  the  address  labels  associated 
with  data  storage  locations  and  I/O  ports  are  defined. 


Monitor  Data  File 


2000 

SSAF0 

JMP  TO  AUX 

FTN 

0 

2003 

SSAF1 

JMP  TO  AUX 

FTN 

1 

2006 

SSAF2 

JMP  TO  AUX 

FTN 

2 

2009 

SSAF3 

JMP  TO  AUX 

FTN 

3 

20  0C 

DATAF 

DATA  ENTER 

FLAG 

200D 

DISCT 

DISPLAY  ADDRESS 

OFFSET 

200E 

FTNFL 

FUNCTION  FLAG 

200F 

ADDRL 

MONITOR  ADDRESS 

BUFFER 

2010 

ADDRH 

2011 

DDAT0 

DISPLAY  DATA  FILE 

2012 

DDAT1 

2013 

DDAT2 

2014 

DDAT3 

2015 

DDAT4 

2016 

DDAT5 

. 

. 


■ 


2017 

2018 

2019 

20  1 A 

20  IB 

20 1C 

20  1  D 

20  IE 

20  1 F 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

202A 

202B 

202C 

20  2D 

202  E 

202F 

2030 

2031 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

203B 

203  E 

2041 

2044 

2047 

204  A 

204D 

2050 

2053 

2056 
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DDAT6 
DEAT7 
IOSBO 
IOSB1 
IOSB2 
FPV  1  1 
FPV12 
FPV  13 
FPV21 
FPV22 
FPV23 
SIGNF 
SHFT1 
SBFT2 
SHFT3 
SHFT4 
SHFT5 
FPLCT 

DECV1 

DEC  V2 
DEC  V3 
DECV4 
DEC  V5 
DECV6 
DECV7 
DEC  V8 
XREG1 
XREG2 
XREG3 
YEEG1 
YREG2 
YREG3 
CLRFL 
MEMOO 
MEM01 
MEM02 
MEM03 
MEM04 
MEM05 
MEM06 
MEM07 
MEM08 
MEM09 
FPDTS 


I/O  READ  WRITE  ROUTINE 
SCRATCHPAD 

FLOATING  POINT  PACK 
BINARY  SCRATCHPAD 


NORMALIZATION  SIGN  FLAG 
NORMALIZATION  ROUTINE  DATA 


FLOATING  POINT  PACK 
LOOP  COUNTER 
DECIMAL  DATA  FILE 
MANTISSA  SIGN 
MANTISSA 


EXPONENT  SIGN 
EXPONENT 

X  REGISTER 


Y  REGISTER 


CLEAR  FLAG 

FIRST  STORAGE  LOCATION 


TEMP  STORAGE  FOR  F.  P.  DATA 
STORE/RECALL  ROUTINES 


. 

: 
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Application  Program  Data  File 


2058 

RPMCT 

20  5  A 

C  VIC  1 

205D 

TIMCT 

205F 

CUTR1 

2062 

RUNFL 

2064 

INTCT 

2065 

ICINV 

2066 

DISPF 

LAST  RPM  COUNT 
OLD  INTEGRAL  CONTROL 
CONTROL  UPDATE  TIMER  COUNT 
LAST  RPM  ERROR 
MOTOR  RUN  FLAG 
CONTROL  INTERRUPT  COUNTER 
INITIAL  VALUE  OF  ABOVE 
MEMORY  REGISTER  DISPLAY  FLAG 


I/O  Port  Addresses 


0004 

D8279 

DISP  DATA  REG 

0005 

C  8279 

BISP  CONTROL  REG 

0006 

C8214 

INTERRUPT  EECODER 

00  F0 

ADC01 

A/D  CONVERTER  DATA 

OOF  1 

FFDAT 

FLIP  FLOP  DATA 

00F3 

TRS12 

TIMER  OVERRUN  RESET 

00F4 

LATSH 

LATCH  SAMPLE/HOLD 

00F7 

TRS  1  1 

CCNTROL  UPDATE  TIMER 
INTERRUPT  RESET 

OOFC 

TIM10 

TIMER  CHIP  1,  COUNTER 

0 

OOFD 

TIM  1  1 

TIMER  CHIP  1,  COUNTER 

1 

OOFE 

TIM12 

TIMER  CHIP  1,  COUNTER 

2 

OOFF 

TIM  1C 

TIMER  CHIP  1,  CONTROL 

REGISTER 

. 

■ 

B.  The  Monitor  System 


Interrupt  Vectors 


0000 

C38300 

JMP  BSTST 

RESET  VECTOR  AND 

INTERRUPT 

0 

0003 

000000 

DB  OH, OH, OH 

0006 

0000 

DB  OH, OH 

0008 

C35500 

JMP  INEST 

INTERRUPT 

1 

000B 

000000 

DB  OH, OH, OH 

00  0E 

0000 

DB  OH, OH 

0010 

C35500 

JMP  INEST 

INTERRUPT 

2 

0013 

000000 

DB  OH, OH, OH 

0016 

0000 

DB  OH, OH 

0018 

C35500 

JMP  INEST 

INTERRUPT 

3 

00  IB 

000000 

DB  OH, OH, OH 

00  IE 

0000 

DB  OH, OH 

0020 

C35500 

JMP  INEST 

INTERRUPT 

4 

0023 

00 

DB  OOH 

0024 

C35500 

JMP  INEST 

TRAP 

0027 

00 

DB  OOH 

0028 

C35500 

JMP  INEST 

INTERRUPT 

5 

002B 

00 

DB  OOH 

002C 

C3CB00 

JMP  KBDST 

RST  5.5  - 

KEYBOARD 

002F 

00 

DB  OOH 

0030 

C35500 

JMP  INEST 

INTERRUPT 

6 

0033 

00 

DB  OOH 

0034 

C35500 

JMP  INEST 

RST  6.5 

0037 

00 

DB  OOH 

0038 

C35500 

JMP  INEST 

INTERRUPT 

7 

003B 

00 

DB  OOH 

003C 

C30314 

JMP  RPMIF 

RST  7.5  - 

RPM  PUIS ER 

003F 

00 

DB  OOH 

. 

. 
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Forwarding  Addresses 


0040  C35D00 
0043  C38300 
0046  C3CB00 
0049  C3B601 
004C  C3A803 
004F  C3D 1 03 
0052  C34202 


ERRFA: JMP  ERRST 
RSTFA: JMP  RSTST 
KBDF A: JMP  KBDST 
CLEF A: JMP  CLRST 
CV SF A: JMP  CVSST 
BKMFA: JMP  BKMST 
DSPF A: JMP  DS PST 


ERROR  ROUTINE 
RESET 

KEYBOARD  MONITOR 
DISPLAY  CLEAR 
HEX  TO  SEVEN  SEG 
BLOCK  MOVE 
DISPLAY  WRITE 


Interrupt  Error  Routine 


0055 

F5 

INEST : PUSH  PSW 

0056 

E5 

PUSH  H 

0057 

210060 

L XI  H , 6000H 

00  5A 

C35D00 

JMP  ERRST 

UNDEFINED  INTERRUPTS  RESULT 

IN  JUMP  TO  INTER  ROUTINE 

SAVE  ACCUMULATOR 

AND  HL  PAIR 

LOAD  ERROR  CODE ,  1 

JUMP  TO  ERROR  DISPLAY  ROUTINE 


Error  Exit  Routine 


ERROR  DISPLAY  ROUTINE 
DISPLAY  ERROR  CODE  AND 
GO  INTO  HALT  STATE 
HL  -  ERROR  NUMBER,  DECODED 


005D 

3E90 

ERRST : M VI 

A  ,  90H 

PREPARE  8279 

TO  WRITE 

00  5F 

D305 

OUT 

C8279 

WITH 

AUTO  INCREMENT  ON 

0061 

7  D 

MOV 

A,  L 

OUTPUT  ERROR 

CODE 

0062 

D304 

OUT 

D  8279 

0064 

1C 

MOV 

A,  H 

0065 

D3C4 

OUT 

D8279 

0067 

AF 

XR  A 

A 

WRITE 

SPACE 

0068 

D304 

OUT 

D  8279 

00  6  A 

3E05 

M  VI 

A  ,  05H 

WRITE 

R 

006C 

D304 

OUT 

D8279 

006E 

3E97 

M  VI 

A  ,  97H 

WRITE 

E 

0070 

D304 

OUT 

D8279 

0072 

AF 

XR  A 

A 

CLEAR 

A 

0073 

D30  4 

OUT 

D8279 

CLEAR 

NEXT  3 

DIGITS 

0075 

D304 

OUT 

D8279 

0077 

D304 

OUT 

D  8279 

0079 

20 

RIM 

READ 

INT  MASK 

007A 

E606 

ANI 

06H 

MASK 

FOR  RST 

6.5,  7.5 

. 


. 
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CLEAR  SOD 


007C 

C648 

ADI  48H 

ENABLE  RST  5.5 

007E 

30 

SIM 

WRITE  INT  MASK 

007F 

FB 

El 

ENAELE  INTERRUPTS 

0080 

El 

POP  H 

RESTORE  REGISTERS 

0081 

FI 

POP  PSW 

0082 

76 

HLT 

WHOA 

System  Reset 

Routine 

0083 

31FF23 

RSTS T : L XI  SP,23FFH 

INITIALIZE  SYSTEM 

LOAD  STACK  POINTER 

0086 

3E00 

M VI  A, 00 

SET  KEYBOARD  TO  2 

0088 

D305 

OUT  C8279 

KEY  LOCKOUT 

008A 

3E24 

M VI  A  ,  24H 

DISP  TO  8  DIG  LEFT  ENTRY 

SET  DIVIDER  TO  04D 

008C 

D305 

OUT  C8279 

008E 

3ED2 

M VI  A , 0D2H 

CLEAR  FIFO,  DISP  RAM 

0090 

D305 

OUT  C 8279 

0092 

DB05 

RST0  1 : IN  C8279 

READ  8279  CONDITION  CODE 

0094 

A7 

ANA  A 

TEST 

0095 

F  A  9  2  0  0 

JM  RST01 

LOOP  IF  DISP  RAM  UNAVAILABLE 

0098 

CDB601 

CALL  CLRST 

CLEAR  DISP,  FLAGS,  DISP  FILE 

C09B 

3E87 

M VI  A , 87H 

DISPLAY  READY 

SELECT  LEFT  DIGIT 

009D 

D305 

OUT  C 8279 

009F 

3E05 

MVI  A  ,  05H 

OUTPUT  R 

00A1 

D304 

OUT  D8279 

0OA3 

3EFF 

MVI  A , 0FFH 

SET  CLEAR  FLAG 

00A5 

323720 

ST' A  CLRFL 

C0A8 

3E5E 

MVI  A,5EH 

ENAELE  RST  SYSTEM 

00  AA 

30 

SIM 

ENABLE  RST  5.5 

DISABLE  REST 

CLEAR  SOD 

SET  INTERRUPT  MASK 

INITIALIZE  STEPPING  STONES 


00  AB 

110020 

LXI 

D, SSAFO 

LOAD  START  ADDRESS 

00  AE 

2E04 

MVI 

L,  04H 

LOAD  NO  OF  STEPPING  STONES 

00B0 

01C000 

EST02 : L  XI 

B , RSTTB 

LOAD  START  OF  DATA  TABLE 

00B3 

2603 

MVI 

H  ,  03H 

LOAD  NO  OF  DATA  BYTES 

00B5 

CDD103 

CALL 

BKMST 

MOVE  TO  RAM 

00B8 

2D 

DCR 

L 

DECREMENT  COUNTER 

00E9 

C2E000 

JNZ 

RST02 

LOAD  DATA  TO  NEXT 

STEPPING  STONE 

00  EC 

FB 

El 

ENABLE  INTERRUPT  SYSTEM 

. 
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00  ED 

C3C703 

JMP 

LOPST 

GO  TO  IDLE  LOOP 

DATA  TAELE 

OOCO 

C3C300 

RSTTE: JMP 

RST03 

RETURN  TO  ERROR 

ROUTINE 

STEPPING  STONE 

ERROR 

00C3 

F5 

RST03: PUSH 

PSW 

00C4 

E5 

PUSH 

H 

00C5 

21F460 

L  XI 

H , 60F4H 

LOAD  ERROR  CODE 

13 

00C8 

C35D00 

JMP 

ERRST 

The  Keyboard  Interrupt  Service  Routine 


00CB 

F5 

KBDST: PUSH 

PSW 

KEYEOARD  READ  ROUTINE 

SAVE  INTERNAL  REGISTERS 

OOCC 

C5 

PUSH 

B 

ON  STACK 

OOCD 

D5 

PUSH 

D 

OOCE 

E5 

PUSH 

H 

OOCF 

20 

RIM 

READ  INT  MASK 

00D0 

E607 

AN  I 

07H 

MASK  FOR  RST  MASKS 

00D2 

C6C9 

ADI 

0C9H 

DISABLE  RST  5.5,  SET  SOD 

00D4 

30 

SIM 

WRITE  MASK 

00D5 

FB 

El 

ENABLE  INTERRUPTS 

00D6 

3E40 

M  VI 

A,40H 

LOAD  READ  COMMAND 

00  D8 

D305 

OUT 

C8279 

OUTPUT  TO  8279 

OODA 

DB04 

IN 

D8279 

READ  FIFO 

00  DC 

4F 

MOV 

C,  A 

SAVE 

OODD 

3A0E20 

LD  A 

FTNFL 

LOAD  FTN  FLAG 

00E0 

81 

ADD 

C 

ADD  KEY  CODE 

OOE1 

211901 

LXI 

H , KBDTB 

LOAD  ADD  OF  KEYBOARD  TABLE 

00E4 

062E 

M  VI 

B,  2EH 

LOAD  MAX  NO  OF  TABLE 

00E6 

BE 

KBDO 1 : CMP 

M 

ENTRIES,  46  D 

COMPARE  CODE  TO  TABLE 

00E7 

CAF900 

JZ  KBD02 

CORRECT  ENTRY  FOUND 

00  EA 

23 

INX 

H 

INCREMENT  HL  TO  NEXT  CODE 

OOEB 

23 

INX 

H 

OOEC 

23 

INX 

H 

OOED 

05 

DCR 

B 

DECREMENT  COUNTER 

OOEE 

C2E600 

JNZ 

KBD0 1 

IF  NOT  ZERO,  CHECK  NEXT 

00F1 

F5 

PUSH 

PSW 

TABLE  ENTRY 

KEYEOARD  ERROR 

SAVE  REGISTERS 

00F2 

E5 

PUSH 

H 

OOF  3 

2100F4 

LXI 

H, 0F400H 

LOAD  ERROR  CODE,  3 

00F6 

C35D00 

JMP 

ERRST 

JUMP  TO  ERROR  DISP  ROUTINE 

00F9 

23 

KBDO  2 : INX 

H 

INCREMENT  HL  AND 

. 
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OOEA 

5E 

MOV 

E,  M 

LOAD  ADDRESS 

NOTE  THAT  ASSEMBLER  STORES 
LS  BYTE  FIRST 

OOFB 

23 

I  NX 

H 

00  FC 

56 

MOV 

D,  M 

OOFD 

01A301 

LXI 

B, KBDRT 

STORE  RETURN  ADD 

0100 

C5 

PUSH 

[  B 

IN  STACK 

0101 

D5 

PUSH 

D 

LOAD  JUMP  ADDRESS 

0102 

F3 

DI 

DISABLE  INT  TO  PREVENT 
ERROR  DUE  TO  INT  DURING 
STACK  MANIPULATION 

0103 

33 

INX 

SP 

POINT  TO  REGISTER  DATA 

0104 

33 

INX 

SP 

0105 

33 

INX 

SP 

0106 

33 

INX 

SP 

0107 

El 

POP 

H 

RESTORE  REGISTERS  FOR 

0108 

D 1 

POP 

D 

SERVICE  ROUTINES 

0109 

Cl 

POP 

B 

01  0  A 

FI 

POP 

ps  w 

01  OB 

3B 

DCX 

SP 

RESTORE  STACK  POINTER 

010C 

3B 

DCX 

SP 

01  OD 

3  B 

DCX 

SP 

01  OE 

3B 

DCX 

SP 

01  OF 

3B 

DCX 

SP 

0110 

3B 

DCX 

SP 

0111 

3B 

DCX 

SP 

01 12 

3B 

DCX 

SP 

01 13 

3B 

DCX 

SP 

0114 

3B 

DCX 

SP 

0115 

3B 

DCX 

SP 

01 16 

3B 

DCX 

SP 

01 17 

FB 

El 

REENABLE  INTERRUPTS 

0118 

C9 

RET 

JUMP  TO  STORED  ADDRESS 

NOTE,  THIS  EXIT  SIMULATES 
A  SUBROTINE  CALL 


KEYBOARD  LOOKUP  TABLE 


Cl  19 

00 

KBDTB: DB 

00H 

KEY 

CODE 

01  1A 

0C02 

DW 

BUT07 

ADD 

OF  SERVICE  ROUTINE 

01  1C 

01 

DB 

0 1  H 

01  ID 

1202 

DW 

BUT  08 

01  IF 

02 

DB 

02H 

0120 

1802 

DW 

BUT09 

0122 

03 

DB 

03H 

0123 

3602 

DW 

EUTOE 

0125 

04 

DB 

04H 

0126 

3C02 

DW 

BUTOF 

0128 

05 

DB 

05H 

0129 

AEO  1 

DW 

KBD03 

012B 

08 

DB 

08H 

012C 

F  AO  1 

DW 

BUT04 

01  2E 

09 

DB 

09H 

012F 

0002 

DW 

BUT  05 
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0131 

0A 

DB 

OAH 

0132 

0602 

DW 

BUT  06 

0134 

OB 

DB 

OBH 

0135 

2A02 

DW 

BUTOC 

0137 

OC 

DB 

OCH 

0138 

3002 

DW 

BUTOD 

013A 

OD 

DB 

ODH 

013B 

0803 

DW 

RUNST 

01  3D 

10 

DB 

1  OH 

013E 

E80  1 

DW 

BUT  01 

0140 

11 

DB 

1  1H 

0141 

EEO  1 

DW 

BUT02 

0143 

12 

DB 

12H 

0144 

F40  1 

DW 

BUT  03 

0146 

13 

DB 

13H 

0147 

1  E02 

DW 

BUTOA 

0149 

14 

DB 

14H 

014A 

2402 

DW 

BUT  OB 

014C 

15 

DB 

15H 

01  4D 

7202 

DW 

LDAST 

014F 

18 

DB 

18H 

0150 

1803 

DW 

SFFST 

0152 

19 

DB 

19H 

0153 

E20 1 

DW 

BUTOO 

0155 

1 A 

DB 

1  AH 

0156 

9502 

DW 

M  WEST 

0158 

IB 

DB 

1  BH 

0159 

0003 

DW 

MRDST 

015B 

1C 

DB 

1 CH 

01  5C 

B60  1 

DW 

CLRST 

015E 

80 

DB 

8  OH 

01  5F 

OOOC 

DW 

CENTF 

0161 

81 

DB 

8  1  H 

0162 

AEO  1 

DW 

KBD03 

0164 

82 

DB 

82H 

0165 

03  OC 

DW 

CCGSF 

0167 

83 

DB 

83H 

0168 

09  OC 

DW 

CSX  YF 

01  6  A 

84 

DB 

84H 

016B 

1  80C 

DW 

CSTRF 

016D 

85 

DB 

85H 

016E 

1  BOC 

DW 

CRCLF 

0170 

88 

DB 

88H 

0171 

1 20C 

DW 

CADDF 

0173 

89 

DB 

89H 

0174 

1 5  OC 

DW 

CSUBF 

0176 

8  A 

DB 

8AH 

0177 

OCOC 

DW 

CMULF 

0179 

8B 

DB 

8BH 

017A 

OFOC 

DW 

CDIVF 

017C 

8C 

DB 

8CH 

017D 

060C 

DW 

CHEXF 

01  7F 

8D 

DB 

8DH 

0180 

AEO  1 

DW 

KBD03 
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0182 

90 

DB 

90H 

0183 

0320 

DW 

SSAF1 

0185 

91 

DB 

9 1  H 

0186 

0620 

DW 

SSAF2 

0188 

92 

DB 

92H 

01  89 

0920 

DW 

SSAF3 

01  8B 

93 

DB 

93H 

01  8C 

AE0  1 

DW 

KBD03 

01  8E 

94 

DB 

94H 

018F 

AE0  1 

DW 

KBD03 

0191 

95 

DB 

95H 

0192 

AE  0 1 

DW 

KBD03 

0194 

98 

DB 

98H 

0195 

AE0 1 

DW 

KBD03 

Cl  97 

99 

DB 

99H 

0198 

0020 

DW 

SSAFO 

019A 

9A 

DB 

9  AH 

019B 

7C03 

DW 

IWRST 

01  9D 

9B 

DB 

9BH 

019E 

1 E03 

DW 

IRDST 

01  A0 

9C 

DB 

9CH 

01  A1 

B60  1 

DW 

CLRST 

0 1  A3 

20 

KBDRT: RIM 

01  A4 

E606 

ANI 

06H 

01  A6 

C648 

ADI 

48H 

01  A8 

30 

SIM 

01  A9 

El 

POP 

H 

01  AA 

D 1 

POP 

D 

01  AB 

Cl 

POP 

B 

01  AC 

FI 

POP 

PSW 

01  AD 

C9 

RET 

01  AE 

F5 

KBD03: PUSH 

PSW 

01  AF 

E5 

PUSH 

H 

0 1  BO 

2100B5 

LXI 

H, 0B500H 

01B3 

C35D00 

JMP 

ERRST 

RETURN  ROUTINE 


READ  INT  MASK 
MASK  FOR  RST  MASKS 
ENAELE  RST  5.5,  CLEAR  SOD 
WRITE  MASK 

RETURN  FROM  KEYBOARD  SERVICE 
ROUTINES 

RESTORE  REGISTERS,  EVEN 
IF  MESSED  UP  BY 
SERVICE  ROUTINE 
RETURN 

ERROR  ROUTINE  FOR 
UNDEFINED  KEY  FTN 
SAVE  REGISTERS 

LOAD  CODE,  2 

JMP  TC  ERROR  DISP  ROUTINE 


. 
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The  Display  Clear  Routine 


01B6 

F5 

CLRST: PUSH 

PSW 

SAVE  INT  REGISTERS 

01B7 

C5 

PUSH 

[  B 

01  E8 

D5 

PUSH 

:  d 

01B9 

E5 

PUSH 

:  h 

01  BA 

3E07 

M  VI 

A,  07H 

SET  DIGIT  COUNT  TO  7 

0 1  BC 

320D20 

STA 

DISCT 

01  BF 

3E90 

MVI 

A  ,90H 

AUTO  INC  DISP  RAM  WRITE 

01C1 

D305 

OUT 

C  8279 

01C3 

AF 

XRA 

A 

CLEAR  A 

01C4 

320E20 

STA 

FTNFL 

CLEAR  FLAGS 

01C7 

320C20 

STA 

DATA! 

0 1 CA 

323720 

STA 

CLRFL 

01  CD 

326620 

STA 

DISPF 

01  DO 

0608 

MVI 

B,  08H 

LOAD  COUNTER 

01  D2 

211120 

LXI 

H#  DDAT0 

LOAD  POINTER 

01D5 

77 

CLRO  1 : MO  V 

M,  A 

CLEAR  DISPLAY  FILE 

01D6 

D304 

OUT 

D  8279 

CLEAR  DISP  RAM 

01D8 

23 

IN  X 

H 

INCREMENT  POINTER 

C1D9 

05 

DCR 

B 

DECREMENT  COUNTER 

01  DA 

C2D501 

JNZ 

CLR0 1 

REPEAT  UNTIL  DONE 

01 DD 

El 

POP 

H 

RESTCRE  INT  REGISTERS 

0 1  DE 

D 1 

POP 

D 

01  DF 

Cl 

POP 

B 

01  F0 

FI 

POP 

PSW 

01E1 

C9 

RET 

Bata 

Entry  Routines 

01E2 

01F300 

BUTO  0: LXI 

B , 00F3H 

LOAD 

HEX  NUMBER 

AND 

SEVEN 

SEGMENT  CODE 

01E5 

C34202 

JMP 

DS  PST 

JUMP 

TO  DISPLAY 

ROUTINE 

01E8 

016001 

BUT01:LXI 

B  ,  0 1 6  OH 

0 1 EB 

C34202 

JMP 

DSPST 

01  EE 

01B502 

BUTO  2: LXI 

B, 02B5H 

01F1 

C34202 

JMP 

DSPST 

01F4 

01F403 

BUT03: LXI 

B, 03F4H 

01F7 

C34202 

JMP 

DSPST 

01  FA 

016604 

BUT04:LXI 

B , 0466H 

01  FD 

C34202 

JMP 

DSPST 

0200 

0  1  D  6  0  5 

BUT05: LXI 

B, 05D6H 

0203 

C34202 

JMP 

DSPST 

0206 

01D706 

BUT06: LXI 

B, 06D7H 

0209 

C34202 

JMP 

DSPST 

02  0C 

017007 

BUTO  7 : L  XI 

B, 0770H 

02  OF 

C34202 

JMP 

DSPST 

0212 

01F708 

BUT08 : LXI 

B, 08F7H 

. 
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0215 

C34202 

JMP 

DSPST 

0218 

01F609 

BUT09: LXI 

B ,  09F 6H 

02 1  B 

C34202 

JMP 

DSPST 

02  IE 

0 1 770 A 

BUT0A: LXI 

B, 0A77H 

0221 

C34202 

JMP 

DSPST 

0224 

01C70B 

EUT0E : LXI 

B , 0BC7H 

0227 

C34202 

JMP 

DSPST 

022A 

01930C 

EUT0C : L  XI 

B, 0C93H 

02  2D 

C34202 

JMP 

DSPST 

0230 

01E50D 

BUT  0  D: LXI 

B , 0DE5H 

0233 

C34202 

JMP 

DSPST 

0236 

01970E 

EUT0  F: L  XI 

B, 0E97H 

0239 

C34202 

JMP 

DSPST 

02  3C 

01  170F 

BUT0F: LXI 

B, OF  1 7H 

C23F 

C34202 

JMP 

DSPST 

0242 

3A3720 

DSPST: LDA 

CLRFL 

0245 

A7 

ANA 

A 

0246 

C4B601 

CNZ 

CLRST 

0249 

3A0D20 

LDA 

DISCT 

024C 

5F 

MOV 

E,  A 

024D 

C680 

ADI 

80H 

024F 

D305 

OUT 

C8279 

0251 

79 

MOV 

A,C 

0252 

D304 

OUT 

D8279 

0254 

1600 

M  VI 

D ,  00H 

0256 

21 1120 

LXI 

H , DDATO 

0259 

19 

DAD 

D 

025A 

70 

MOV 

M,  B 

025B 

ID 

DCR 

E 

025C 

F26D02 

JP  DSP02 

025F 

3A0C20 

LDA 

DATAF 

0262 

BA 

CMP 

D 

0263 

CA6B02 

JZ  DSP 0 1 

0266 

1 E0  1 

MVI 

E,  01H 

0268 

C36D02 

JMP 

DSP02 

026B 

1 E  07 

DSP0  1 : MVI 

E,  07H 

026D 

7B 

DSPO  2 : MOV 

A  /  E 

026E 

320D20 

STA 

DISCT 

0271 

C9 

RET 

ROUTINE  TO  ENTER  DATA  INTO 

DISPLAY  AND  RAM 

B  -  HEX  DIGIT 

C  -  7  SEG  CODE 

LOAD  CLEAR  FLAG 

TEST 

CALL  CLEAR  ROUTINE  IF  SET 
LOAD  DISP  ADD  OFFSET 


SELECT  RAM  LOCATION 

WRITE  DIGIT 
CLEAR  D 

LOAD  ADD  OF  DDATO 

ADD  BC  AND  HL  PAIRS 

LOAD  STORED  DIGIT 

TO  SCRATCHPAD 

DECREMENT  DISPLAY  COUNT 

SKIP  IF  POSITIVE 

LOAD  DATA/ADD  ENTER  FLAG 

CHECK  IF  ZERO 

SKIP  IF  DATA  FLAG  NOT  SET 

SET  DISP  COUNT  TO  1 

SET  DISP  COUNT  TO  7 

STORE  DECREMENTED  DISP  COUNT 


. 
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The  Load  Address  Routine 


0272 

211820 

LDAST: L  XI 

H  g DD AT7 

0275 

7E 

MOV 

A,  M 

0276 

07 

RLC 

0277 

07 

RLC 

0278 

07 

RLC 

0279 

07 

RLC 

027A 

2B 

DCX 

H 

027B 

86 

ADD 

M 

027C 

57 

MOV 

D,  A 

C27D 

2B 

DCX 

H 

027E 

7E 

MOV 

A,  M 

02  7F 

07 

RLC 

0280 

07 

RLC 

0281 

07 

RLC 

0282 

07 

RLC 

0283 

2B 

DCX 

H 

0284 

86 

ADD 

M 

0285 

5F 

MOV 

E,  A 

0286 

EB 

XCHG 

0287 

CDB402 

CALL 

,  MDSST 

028A 

3EFF 

M  VI 

A , OF  FH 

028C 

320C20 

STA 

DATAF 

028F 

3E0 1 

M  VI 

A  ,  0  1 H 

0291 

320D20 

STA 

DISCT 

0294 

C9 

RET 

The  Memory  Write  Function 


0295  211220  MWRST:LXI  H,DDAT1 

0298  7E 
0299  07 
02 9 A  07 
02  9  E  07 
029C  07 
029D  2B 
029E  86 
C29F  2A0F20 
02A2  77 
02 A3  BE 
02A4  CAAF02 
02A7  F5 
02A8  E5 
02A9  21F3B5 
02 AC  C35D00 
02 AF  23 
02B0  CDE402 
02E3  C9 


LOAE  ADD  OF  FIRST  DATA  ENTRY 
LOAD  MS  NIBBLE 


ADD  2ND  NIBBLE 


LOAD  3RD  NIBBLE 


ADD  LS  NIBBLE 

MOVE  DE  TO  HL 
STORE  ADD,  DISP  DATA 

SET  DATA  FLAG 

SET  DIGIT  COUNT  TO  1 


LOAE  ADDRESS  OF  MS 
DATA  NIBBLE 


DECREMENT  HL 
ADD  LS  NIBBLE 
LOAD  DATA  ADDRESS 
LOAD  NEW  DATA  TO  MEMORY 

SKIP  IF  DATA  WRITTEN  OK 
ERROR  EXIT 

ERROR  CODE  20 

INCREMENT  DATA  ADDRESS 
RD  AND  DISP  DATA 


MOV  A  ,  M 

RLC 

RLC 

RLC 

RLC 

DCX  H 

ADD  M 

LHLD  ADDRI 
MOV  M , A 
CMP  M 
JZ  MWR01 
PUSH  PSW 
PUSH  H 

L XI  H , 0B5F3H 
JMP  ERRST 
M WR0 1 : INX  H 

CALL  MDSST 
RET 


. 

•- 
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Beading  and  Displaying  a  _Memor_y  Location 


02E4 

46 

MDS ST : MOV  B,M 

02B5 

220F20 

SHLD  ADDRL 

02E8 

3E90 

MV I  A,90H 

02  BA 

D305 

OUT  C8279 

C2BC 

78 

MOV  A , B 

02BD 

E6  OF 

ANI  OFH 

02  BF 

CDA803 

CALL  CVSST 

02C2 

D304 

OUT  D 8279 

02C4 

78 

MOV  A,B 

02C5 

OF 

RRC 

02  C6 

OF 

RPC 

02C7 

OF 

RRC 

02C8 

OF 

RRC 

02C9 

E6  OF 

ANI  OFH 

02CB 

CDA803 

CALL  CVSST 

02  CE 

D304 

OUT  D 8279 

02D0 

7D 

MOV  A,L 

02D 1 

E6  OF 

ANI  OFH 

02D3 

CDA803 

CALL  CVSST 

02  D6 

C608 

ADI  08H 

02D8 

D304 

OUT  D8279 

02DA 

7D 

MOV  A , L 

02DB 

OF 

RRC 

02DC 

OF 

RRC 

02DD 

OF 

RRC 

02DE 

OF 

RRC 

02  DF 

E6  OF 

ANI  OFH 

02E1 

CDA803 

CALL  CVSST 

02E4 

D304 

OUT  D8279 

02E6 

7C 

MOV  A,H 

02E7 

E6  OF 

ANI  OFH 

02E9 

CDA803 

CALL  CVSST 

02EC 

D304 

OUT  D8279 

02EE 

7C 

MOV  A  ,  H 

02EF 

OF 

RRC 

02F0 

OF 

RRC 

02F1 

OF 

RRC 

02F2 

OF 

RRC 

02F3 

E60F 

ANI  OFH 

02F5 

CDA803 

CALL  CVSST 

02F8 

D304 

OUT  D8279 

02FA 

AF 

XRA  A 

BEAD  MEMORY  LOCN 

B  -  DATA 

HL  -  ADDRESS 

STORE  MEMORY  LOCN  ADDR 

PREPARE  DISP  RAM  FOR  NEW  DATA 

WITH  AUTO  I  NCR  ON 

MASK 

WRITE  TO  DISP 


ADD  DOT 


CLEAR  A 


. 
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02FB  D304 
02FD  D304 
02FF  C9 


OUT  D8279  CLEAR  2  LEFT  DIGITS 

OUT  D 8279 

RET 


The  Memory  Read  Function 


0300  2A0F20  MRDST : LHLD  ADDRI 
0303  23  INX  H 

0304  CDB402  CALL  MDSST 

0307  C9  RET 


LOAD  DATA  ADDRESS  TO  HL 
INCREMENT  ADDRESS 
LOAD  AND  DISP  DATA 


The  Run  Function 


0308 

2600 

RUN  ST : M  VI  H , 00H 

03  0A 

2E0  A 

MV I  L, 0AH 

03CC 

39 

DAD  SP 

030D 

F  9 

SPHL 

030E 

2A0F20 

LHLD  ADDRL 

0311 

20 

RIM 

0312 

E606 

ANI  06H 

0314 

C648 

ADI  48H 

0316 

30 

SIM 

0317 

E9 

PCHL 

Settinq  the 

Function 

Flas 

0318 

3E80 

SFFST: M VI 

A  ,  80H 

03  1  A 

320E20 

STA 

FTNFL 

03  ID 

C9 

RET 

LOAD  STACK  POINTER  OFFSET 
ADD  SP  TO  HL 

LOAD  RESULT  TO  STACK  POINTER 

LOAD  ADDRESS 

READ  INT  MASK 

MASK  FOR  RST  MASKS 

ENABLE  RST  5.5,  CLEAR  SOD 

WRITE  MASK 

LOAD  HL  TO  PC,  JUMP  SHIP 


SET  FTN  FLAG  TO  80 


' 
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The  I/O  Port  Read  Function 


03  IE 

AF 

IRDST: XRA 

A 

03  IF 

320E20 

STA 

FTNFL 

0322 

211820 

LXI 

H , DD AT7 

0325 

7E 

MOV 

A,  M 

03  26 

07 

RLC 

0327 

07 

RLC 

0328 

07 

RLC 

0329 

07 

RLC 

032A 

2B 

DCX 

H 

032B 

86 

ADD 

M 

032C 

47 

MOV 

B,  A 

03  2D 

211920 

LXI 

H  t IOSBO 

0330 

3EDE 

M  VI 

A , 0DBH 

0332 

77 

MOV 

M,  A 

0333 

23 

INX 

H 

0334 

70 

MOV 

M,  B 

0335 

3EC9 

M  VI 

A , 0C9H 

0337 

23 

INX 

H 

0338 

77 

MOV 

M,  A 

0339 

CD  1 920 

CALL 

,  IOSBO 

033C 

4F 

MOV 

C,  A 

033D 

CD  4103 

CALI 

,  IDSST 

0340 

C9 

RET 

CLEAR  A 

CLEAR  FTN  FLAG 
LOAE  ADDRESS  OF  DATA 
ENTER  MS  NIBBLE 


ADD  LS  NIBBLE 
STORE 

LOAE  ADD  OF  I/O 
ROUTINE  SPACE 
OPCODE  FOR  I/O  READ 
STORE 

STORE  PORT  NO 
OPCODE  FOR  RET 


CALL  JUST  WRITTEN  ROUTINE 
STORE  PORT  CONTENTS 


I/O  Port  Data  Display  Routine 


B  -  PORT  NO 
C  -  CONTENTS  OF  PORT 


0341 

3E90 

IDSST: M VI  A,90H 

SET  UP  8279  FOR  DATA  WRITE 
WITH  AUTO  INCREMENT 

03  43 

D305 

OUT  C8279 

0345 

AF 

XRA  A 

CLEAR  A 

0346 

D304 

OUT  D8279 

WRITE  TO  LOCN  0 

0348 

79 

MOV  A,C 

LOAD  CONTENTS  OF  PORT 

0349 

E60F 

ANI  0FH 

MASK 

034B 

CDA803 

CALL  CVSST 

034E 

D304 

OUT  D8279 

0350 

79 

MOV  A , C 

0351 

OF 

RRC 

0352 

OF 

RRC 

03  53 

OF 

RRC 

0354 

OF 

RRC 

0355 

E6  OF 

ANI  OF H 

0357 

CDA803 

CALL  CVSST 

03  5A 

D304 

OUT  D8279 

IX: 
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03  5C 

78 

MOV  A,B 

LOAD  PORT  NO 

C3  5D 

E6  Of 

ANI  OFH 

03  5F 

CDA803 

CALL  CVSST 

0362 

C608 

ADI  08H 

ADD  DOT 

0364 

D304 

OUT  D 8279 

0366 

78 

MOV  A,B 

0367 

Of 

RRC 

0368 

OP 

RRC 

0369 

OP 

RRC 

036A 

OP 

RRC 

036B 

E6  OF 

ANI  OFH 

036D 

CDA803 

CALL  CVSST 

0370 

D304 

OUT  D8279 

0372 

3E37 

M VI  A,37H 

ENTER  CODE  FOR  P 

0374 

D304 

OUT  D8279 

0376 

AF 

XR  A  A 

CLEAR  A 

0377 

D304 

OUT  D8279 

CLEAR  2  LEFT  DIGITS 

0379 

D304 

OUT  D8279 

03  7B 

C9 

RET 

Ihe  I/O  Port  Write  function 


037C 

AF 

IWRST: XRA 

A 

CLEAR  A 

037D 

320E20 

STA 

FT  NFL 

CLEAR  FTN  FLAG 

0380 

211820 

LXI 

H , DDAT7 

LOAD  DATA  ADDRESS 

03  83 

7E 

MOV 

A,M 

LOAD  MS  ADD  NIBBLE 

0384 

07 

RLC 

0385 

07 

RLC 

0386 

07 

RLC 

0387 

07 

RLC 

0388 

2B 

DCX 

H 

0389 

86 

ADD 

M 

ADD  LS  NIBBLE 

038A 

47 

MOV 

B,  A 

038B 

2B 

DCX 

H 

03  8C 

7E 

MOV 

A ,  M 

LOAD  MS  DATA  NIBBLE 

038D 

07 

RLC 

038E 

07 

RLC 

038F 

07 

RLC 

0390 

07 

RLC 

0391 

2B 

DCX 

H 

0392 

86 

ADD 

M 

ADD  LS  DATA  NIBBLE 

0393 

4F 

MOV 

C,  A 

B  -  PORT  NO 

C  -  DATA 

0394 

211920 

LXI 

H , IOSBO 

LOAD  START  ADDRESS  OF 

I/O  ROUTINE  SPACE 

0397 

3ED3 

M  VI 

A,  0D3H 

I/O  WRITE  OPCODE 

0399 

77 

MOV 

M,  A 

039A 

23 

INX 

H 

C39E 

70 

MOV 

M,  B 

LOAD  PORT  NO 

. 
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039C 

23 

INX  H 

C39D 

3EC9 

MV I  A,0C9H 

RETURN 

OPCODE 

039F 

77 

MOV  M,A 

03  AO 

79 

MOV  A,C 

03  A 1 

CD  1920 

CALL  IOSBO 

WRITE 

DATA  TO  PORT 

03  A4 

CD4103 

CALL  IDSST 

UPDATE 

DISPLAY 

03A7 

C9 

RET 

Conversion  from  Hexadecimal  to  Seven  Segment  Code 


HEX  IN  A  REG  CONVERTED 
TO  SEVEN  SEGMENT  CODE 


03A8 

E5  CVSST: PUSH 

H 

SAVE  INT  REGISTERS 

03  A9 

D5 

PUSH 

D 

03  AA 

E6  OF 

ANI 

0FH 

MASK  FOR  HEX 

03  AC 

21B703 

LXI 

H,CVSTB 

LOAD  STARTING  ADDRESS 

03  AF 

5F 

MOV 

E,  A 

SEVEN  SEGMENT  TABLE 
MOVE  OFFSET  TO  E 

03E0 

1600 

M  VI 

D  ,  00H 

CLEAR  D 

03B2 

19 

DAD 

D 

ADD  OFFSET  TO  ADD  IN 

03  B3 

7E 

MOV 

A,  M 

LOAD  7  SEG  CODE 

03B4 

D 1 

POP 

D 

03E5 

El 

POP 

H 

03B6 

03E7 

C9 

F360B5F4 

RET 

C  V  STB : DB 

0F3H ,6  OH 

, 0B5H,0F4H 

03BB 

66D6D770 

DB 

66H,  0D6H 

, 0D7H,70H 

03  BF 

F7F677C7 

DB 

0F7H,0F6H, 77H,0C7H 

03C3 

93E59717 

DB 

93H,0E5H 

,97H, 1 7  H 

The  Idle  Loop 


03C7 

FB 

LOPST:EI 

ENABLE  INTERRUPTS 

03C8 

3E40 

LOPO  1 : M VI 

A,  40H 

CLEAR  SOD 

03CA 

30 

SIM 

03CB 

3EC0 

M  VI 

A, 0C0H 

SET  SOD 

03CD 

30 

SIM 

03CE 

C3C803 

JMP 

LOP0 1 

REPEAT  LOOP  TILL  INTERRUPTED 

. 
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The  Data  Block  Move  Routine 


03D1 

F5 

BKMST: PUSH  PSW 

03D2 

OA 

BKMO 1 : LDAX  B 

03D3 

12 

STAX  D 

03D4 

03 

INX  B 

03D5 

13 

INX  D 

03D6 

25 

DCR  H 

03D7 

C2D203 

JNZ  BKM01 

03DA 

FI 

POP  PSW 

03DB 

C9 

RET 

BC  -  ADDRESS  TO  BE  MOVED  FROM 

DE  -  ADDRESS  TO  BE  MOVED  TO 

H  -  NO  OF  BYTES  TO  BE  MOVED 

SAVE  ACCUMULATOR 

LOAD  DATA 

STORE  IN  NEW  LOCN 


DECREMENT  COUNTER 
REPEAT  UNTIL  DONE 
RESTORE  ACCUMULATOR 


> 
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C.  The  Floating  Point  Arithmetic  Package 


Forwarding  Addresses 


0400 

C31804 

MULFA: JMP 

MULST 

F.P. 

MULTIPLY 

04  03 

C37E05 

DIVFA: JMP 

DIVST 

F.  P. 

DIVIDE 

0406 

C38406 

ADDFA: JMP 

ADDST 

F.P. 

ADD 

0409 

C38307 

SUBFA: JMP 

SUBST 

F.P. 

SUBTRACT 

04  0C 

C3FB04 

NRMFA: JMP 

NRMST 

F.P. 

NORMALIZE 

04  OF 

C39E07 

FSLFA: JMP 

FSLST 

SHIFT 

LEFT 

0412 

C3B307 

FSRFA: JMP 

FSRST 

SHIFT 

RIGHT 

0415 

C3CD04 

M16BF: JMP 

M16ES 

16  BIT  BINARY  MULTIPLY 

Floating  Point 

Binary  Multiplication 

0418 

F5  MULST: PUSH  PSW 

SAVE  INT  REGISTERS 

0419 

C5 

PUSH  B 

04  1 A 

D5 

PUSH  D 

04  IB 

E5 

PUSH  H 

04  1C 

AF 

XR A  A 

CLEAR  A 

04  1 D 

322220 

STA  SIGNF 

CLEAR  SIGN  FLAG  FOR 
POSITIVE  RESULT 

0420 

3A1C20 

LDA  FPV11 

LOAD  MS  MULTIPLIER  EYTE 

0423 

47 

MOV  B,A 

STORE 

0424 

17 

RAL 

SHIFT  BIT  7  TO  CY 

0425 

D23F04 

JNC  MUL01 

SKIP  IF  NUMBER  +VE 

0428 

3A2220 

LDA  SIGNF 

LOAD  SIGN  FLAG 

042B 

2F 

CM  A 

COMPLEMENT 

04  2C 

322220 

STA  SIGNF 

STORE 

042F 

78 

MOV  A,B 

LOAD  MS  MULTIPLIER 

0430 

2F 

CM  A 

COMPLEMENT 

0431 

47 

MOV  B , A 

0432 

3A1D20 

LDA  FPV12 

LOAD  LS  MULTIPLIER 

0435 

2F 

CMA 

0436 

C601 

ADI  0 1 H 

INCREMENT 

0438 

321D20 

STA  FPV12 

STORE 

. 


.  . 
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043B 

78 

MOV 

A,B 

043C 

CE00 

ACI 

00H 

043E 

47 

MOV 

B,  A 

043F 

3A1D20 

MUL0  1 : LDA 

FPV12 

0442 

4F 

MOV 

C,  A 

0443 

3A1F20 

LDA 

FPV21 

0446 

57 

MOV 

D,A 

0447 

17 

RAL 

0448 

D26204 

JNC 

MUL02 

044B 

3 A  2220 

LDA 

SIGNF 

044E 

2F 

CMA 

04  4F 

322220 

STA 

SIGNF 

0452 

7A 

MOV 

A ,  D 

0453 

2F 

CMA 

0454 

57 

MOV 

D,  A 

0455 

3A2020 

LDA 

FPV22 

0458 

2F 

CMA 

0459 

C601 

ADI 

0 1  H 

C45B 

322020 

STA 

FPV22 

045E 

7A 

MOV 

A ,  D 

045F 

CE00 

ACI 

00H 

0461 

57 

MOV 

D,  A 

0462 

3A2020 

MUL0  2: LDA 

FPV22 

0465 

5F 

MOV 

E,  A 

0466 

CDCD04 

CALI 

-  M16BS 

ADD  CAREY  TO  C 
STORE 

LOAD  LS  MULTIPLIER 

LOAD  MS  MULTIPLICAND  BYTE 

SKIP  IF  NO  CARRY 
COMPLEMENT  SIGN  FLAG 
LOAD  MS  MULTIPLICAND 

LOAD  LS  MULTIPLICAND 


LOAD  LS  MULTIPLICAND 
MULTIPLY  16  BIT  NUMBERS 


STORE  RESULTS 


0469 

44 

MOV 

B ,  H 

STORE  HL 

046A 

4D 

MOV 

C,L 

046B 

A7 

ANA 

A 

CLEAR  CARRY 

046C 

7B 

MOV 

A,  E 

LOAD  LS  BYTE 

04  6D 

17 

RAL 

SHIFT  TO  MULTIPLY  BY  2  TO 
COMPENSATE  FOR  MANTISSA 
MULTIPLICATION  ALGORITHM'S 
DIVISION  BY  TWO 

046E 

5F 

MOV 

E,  A 

046F 

7A 

MOV 

A  ,  D 

0470 

17 

RAL 

0471 

57 

MOV 

D,  A 

0472 

79 

MOV 

A,C 

0473 

17 

RAL 

0474 

4F 

MOV 

C,  A 

0475 

78 

MOV 

A,B 

0476 

17 

RAL 

SHIFT  MS  BYTE 

0477 

47 

MOV 

B,  A 

0478 

212320 

LXI 

H , SHFT1 

C47B 

70 

MOV 

M,  B 

STCRE  MS  PRODUCT  BYTE 

047C 

23 

INX 

H 

047D 

71 

MOV 

M,C 

047E 

23 

INX 

H 

C47F 

72 

MOV 

M,  D 

0480 

23 

INX 

H 

0481 

73 

MOV 

M  ,  E 

. 
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0482  23  INX  H  POINT  HL  TO  SHFT5 

ADD  EXPONENTS 


0483 

3A1E20 

LDA  FPV13 

LOAD  MULTIPLIER  EXPONENT 

04  86 

47 

MOV  B,A 

STORE 

04  87 

17 

RAL 

SHIFT  SIGN  TO  CY 

0488 

DAA404 

JC  MUL03 

SKIP  FOR  -VE  EXP 

TEST  SECOND  EXPONENT 

048B 

3A2120 

LDA  FPV23 

LOAD  MULTIPLICAND  EXPONENT 

048E 

4F 

MOV  C,A 

04  8F 

17 

RAL 

0490 

DAAC04 

JC  MUL04 

BOTH  EXPONENTS  +VE 

0493 

78 

MOV  A,B 

04  94 

81 

ADD  C 

ADD  EXPONENTS 

0495 

322720 

STA  SHFT5 

STORE  RESULT 

0498 

17 

RAL 

SHIFT  SIGN  TO  CY 

0499 

D2C504 

JNC  MUL06 

JUMP  TO  MUL06  ROUTINE 
EXPONENT  OVERFLOW  IF  CY  SET 

049C 

F5 

PUSH  PSW 

SAVE  REGISTERS 

049D 

E5 

PUSH  H 

049E 

210066 

L XI  H,6600H 

LOAD  ERROR  CODE  4 

04A1 

C34000 

JMP  ERRFA 

04A4 

3A2120 

MUL03: LDA  FPV23 

TEST  SECOND  EXPONENT 

04A7 

4F 

MOV  C,A 

SAVE  MULTIPLICAND  EXP 

04A8 

17 

RAL 

TEST  SIGN 

04A9 

DAB404 

JC  MUL05 

JUMP  IF  SECOND  SIGN  -VE 

ONE  + VE  AND  ONE  -VE  SIGN 

NO  EXP  ERROR  POSSIBLE 

04AC 

78 

MULO 4 : MOV  A,E 

04  AD 

81 

ADD  C 

ADD  EXPONENTS 

04  AE 

322720 

STA  SHFT5 

STORE  RESULT 

04B1 

C3C504 

JMP  MUL06 

BOTH  EXP  -VE 

04B4 

78 

MULO 5: MOV  A , B 

04  B5 

81 

ADD  C 

ADD  EXPONENTS 

04B6 

322720 

STA  SHFT5 

04B9 

17 

RAL 

04  EA 

DAC504 

JC  MUL06 

JUMP  IF  NO  SIGN  CHANGE 

IF  CARRY  CLEAR  EXPONENT 
UNDERFLOW  HAS  OCCURED 

04  BD 

F5 

PUSH  PSW 

04  BE 

E5 

PUSH  H 

04  BF 

2100D6 

LXI  H,0D600H 

LOAD  ERROR  CODE  5 

04C2 

C34000 

JMP  ERRFA 

04C5 

CDFB04 

MUL  06 : CALL  NRMST 

NORMALIZE 

04C8 

El 

POP  H 

04C9 

D 1 

POP  D 

04CA 

Cl 

POP  B 

04CB 

FI 

POP  PSW 

04  CC 

C9 

RET 

* 
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Sixteen  Eit  Binary  Integer  Multiplication 


04CD 

AF 

M16BS:XRA  A 

04CE 

67 

MOV  H , A 

04CF 

6F 

MOV  L , A 

04D0 

E5 

PUSH  H 

04D1 

3E10 

M  VI 

A  ,  1  OH 

04D3 

322820 

STA 

FPLCT 

04D6 

78 

M16B1: MOV 

A  ,  B 

04D7 

IF 

RAR 

04D8 

47 

MOV 

B,  A 

04D9 

79 

MOV 

A  ,  C 

04  DA 

IF 

RAR 

04  DB 

4F 

MOV 

C,  A 

04  DC 

D2E004 

JNC 

Ml  6B2 

04DF 

19 

DAD 

D 

04E0 

7C 

M16B2: MOV 

A  ,  H 

04E1 

A7 

ANA 

A 

04E2 

IF 

RAR 

04E3 

67 

MOV 

H,  A 

04E4 

7  D 

MOV 

A, I 

04E5 

IF 

RAR 

04E6 

6F 

MOV 

L,  A 

04E7 

E3 

XTHL 

C4E8 

7C 

MOV 

A  ,  H 

04E9 

IF 

RAR 

04EA 

67 

MOV 

H,  A 

04  EB 

7D 

MOV 

A,  L 

04  EC 

IF 

RAR 

04  ED 

6F 

MOV 

L,  A 

04EE 

E3 

XTHL 

04EF 

3A2820 

LDA 

FPLCT 

04F2 

3D 

DCR 

A 

04F3 

322820 

STA 

FPLCT 

C4F6 

C2D604 

JNZ 

Ml  6B1 

04F9 

D  1 

POP 

D 

04FA 

C9 

RET 

16  EIT  MULTIPLY 
BC  -  MULTIPLIER 
DE  -  MULTIPLICAND 
CLEAR  A,  H,  L 


CLEAR  TOP  OF  STACK 

HI  -  MS  BYTES  OF  PRODUCT 

TOP  OF  STACK  -  LS  BYTES 

STORE  COUNTER 

SHIFT  MULTIPLIER  RIGHT 

SHIFT  RIGHT 


SKIP  IF  BIT  0 

ADD  MULTIPLICAND  TO  MS  HALF 

OF  PRODUCT 

SHIFT  PRODUCT  RIGHT 

CLEAR  CARRY 

SHIFT  RIGHT 

STORE 

GET  NEXT  BYTE 


LOAD  LS  BYTES ,  STORE  MS 


STORE  LS  BYTES,  LOAD  MS 
LOAD  COUNTER 
DECREMENT  COUNTER 
STORE  COUNTER 

MULTIPLICATION  DONE 
LOAD  LS  PRODUCT  BYTES 
DE  -  LS  2  BYTES  OF  PROD 
HL  -  MS  2  BYTES  OF  PROD 
EXIT 
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The  Floating  Point  Normalization  Routine 


04FB 

F5 

NRMST : PUSH 

PSN 

04FC 

C5 

PUSH 

:  B 

04FD 

D5 

PUSH 

D 

04FE 

E5 

PUSH 

H 

04FF 

212320 

LXI 

H , SHFT1 

0502 

46 

MOV 

B,M 

0503 

23 

INX 

H 

0504 

4E 

MOV 

C,  M 

0505 

23 

INX 

H 

0506 

56 

MOV 

D  ,  M 

0507 

23 

INX 

H 

0508 

5E 

MOV 

E,  M 

05  09 

23 

INX 

H 

050A 

66 

MOV 

H,M 

050B 

6C 

MOV 

L  ,  H 

050C 

78 

MOV 

A,  B 

05  0D 

A7 

ANA 

A 

050E 

C22105 

JNZ 

NRM01 

0511 

81 

ADD 

C 

0512 

C22105 

JNZ 

NRM01 

0515 

82 

ADD 

D 

0516 

C22105 

JNZ 

NR  M0 1 

0519 

83 

ADD 

E 

05 1 A 

C22105 

JNZ 

NR  M0  1 

05  ID 

67 

MOV 

H,  A 

051E 

C37005 

JMP 

NRM06 

0521 

78 

NRM0 1 : MOV 

A,B 

0522 

17 

NRM02: RAL 

0523 

17 

RAL 

0524 

DA3705 

JC  NRM03 

0527 

7B 

MOV 

A  ,  E 

0528 

17 

RAL 

0529 

5F 

MOV 

E  ,  A 

052A 

7A 

MOV 

A  ,  D 

052B 

17 

RAL 

052C 

57 

MOV 

D  ,  A 

052D 

79 

MOV 

A,C 

052E 

17 

RAL 

052F 

4F 

MOV 

C,  A 

0530 

78 

MOV 

A  ,  B 

0531 

17 

RAL 

0532 

47 

MOV 

B,  A 

0533 

25 

DCR 

H 

0534 

C32205 

JMP 

NRM02 

0537 

7A 

NRM03: MOV 

A,  D 

0538 

17 

RAL 

0539 

D24805 

JNC 

NRM04 

SAVE  I NT  REGISTERS 


LOAD  MANTISSA  AND  EXPONENT 
TO  BE  NORMALIZED 


SAVE  EXP  TO  TEST  FOR 
SIGN  ERROR 

TEST  FOR  ZERO  MANTISSA 
TEST 

SKIP  IF  NOT  ZERO 
TEST  NEXT  BYTE 


SKIP  IF  LAST  BYTE  NOT  ZERO 
SET  EXPONENT  TO  ZERO 
JUMP  TO  STORE  RESULT 
LOAD  MS  BYTE 
SHIFT  SIGN  BIT  TO  CY 
SHIFT  MS  DATA  BIT  TO  CY 
SKIP  IF  BIT  IS  1 
MS  DATA  BIT  ZERO 
ROTATE  ALL  BYTES  LEFT 


DECREMENT  EXPONENT 
RETURN  TO  RETEST  MS 
DATA  BIT 

TEST  FOR  ROUNDUP 

SKI F  IF  NO  ROUNDUP  NEEDED 
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053C 

OC 

INK  C 

INCREMENT  LS  BYTE 

053D 

C24805 

JNZ  NRM04 

SKIP  IF  NO  CAREY 

0540 

04 

INR  B 

INCREMENT  MS  BYTE 

0541 

F24805 

JP  NRM04 

SKIP  IF  MS  BIT  0 

0544 

78 

MOV  A,B 

CAREY  INTO  SIGN  BIT  HAS 
OCCURRED 

0545 

OF 

EEC 

ROTATE  RIGHT,  NO  NEED  TO 
ROTATE  C  AS  IT  MUST  BE  0 

0546 

47 

MOV  B,A 

0547 

24 

INR  H 

INCREMENT  EXPONENT 

TEST  FOR  EXPONENT  U  NDERFOLW 
OVERFLOW  NOT  POSSIBLE 

0548 

7D 

NEM04 : MOV  A, I 

LOAD  ORIGINAL  EXPONENT 

0549 

17 

RAl 

054  A 

D25D05 

JNC  NEM05 

SKIP  IF  SIGN  + VE 

054D 

7C 

MOV  A,H 

054E 

17 

EAL 

TEST  FINAL  EXPONENT 

05  4F 

DA5D05 

JC  NRM05 

SKIP,  NO  UNDERFLOW 

0552 

CD5B05 

CALL  NEM05 

ERROR,  FINISH  ROUTINE  FIRST 

0555 

F5 

PUSH  PSW 

ERROR  EXIT 

0556 

E5 

PUSH  H 

0557 

2100D7 

L XI  H , 0D7 00H 

LOAD  ERROR  CODE  6 

05  5  A 

C34000 

JMP  EEEFA 

ADD  SIGN  TO  RESULT 

055D 

3A2220 

NRM05: LDA  SIGNF 

LOAD  SIGN  FLAG 

0560 

A7 

ANA  A 

TEST 

0561 

CA7005 

JZ  NEM06 

SKIP  IF  0,  SIGN  +VE 
COMPLEMENT  MANTISSA 

0564 

78 

MOV  A,B 

0565 

2F 

CM  A 

COMPLEMENT 

0566 

47 

MOV  B  ,  A 

0567 

79 

MOV  A,C 

0568 

2F 

CM  A 

COMPLEMENT 

0569 

C601 

ADI  0 1 H 

ADD  CARRY 

056B 

4F 

MOV  C,A 

056C 

78 

MOV  A  ,  B 

056D 

CEO  0 

ACI  00H 

05  6F 

47 

MOV  B,A 

0570 

54 

NEM06: MOV  D, H 

05  71 

21 1F20 

LXI  H,FPV21 

LOAD  RESULT  ADDRESS 

0574 

70 

MOV  M  ,  B 

0575 

23 

INX  H 

0576 

71 

MOV  M,C 

0577 

23 

INX  H 

0578 

72 

MOV  M,D 

0579 

El 

POP  H 

RESTORE  INT  REGISTERS 

057A 

D  1 

POP  D 

057B 

Cl 

POP  B 

057C 

FI 

POP  PSW 

05  7D 

C9 

EET 

. 
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C57E 

F5 

DIVST: PUSH 

PSW 

057F 

C5 

PUSH 

:  b 

0580 

D5 

PUSH 

D 

0581 

E5 

PUSH 

H 

0582 

AF 

XRA 

A 

0583 

322220 

STA 

SIGNF 

0586 

3A1C20 

LDA 

FP  V 1  1 

05  89 

47 

MOV 

B  r  A 

058A 

17 

RAL 

05  8B 

D2A505 

JNC 

DI  V0 1 

05  8E 

3A2220 

LDA 

SIGNF 

0591 

2F 

CM  A 

0592 

322220 

STA 

SIGNF 

05  95 

78 

MOV 

A,  B 

0596 

2F 

CM  A 

0597 

47 

MOV 

B,  A 

0598 

3A1D20 

LDA 

FPV12 

05  9  B 

2F 

CMA 

059C 

C601 

ADI 

0  1  H 

05  9E 

321D20 

STA 

FP  VI  2 

05A1 

78 

MOV 

A,  B 

05  A2 

CE00 

ACI 

00H 

05A4 

47 

MOV 

B,  A 

05A5 

3 A  1D20 

DI V0 1 : LDA 

FP  VI 2 

05  AS 

4F 

MOV 

C,  A 

05  A9 

3A1F20 

LDA 

FPV21 

05  AC 

57 

MOV 

D,  A 

05AD 

17 

RAL 

05  AE 

D2C805 

JNC 

DIV02 

05B1 

3  A  2  2  2  0 

LDA 

SIGNF 

05B4 

2F 

CMA 

05B5 

322220 

STA 

SIGNF 

05B8 

7  A 

MOV 

A  ,  D 

05  E9 

2F 

CMA 

05E  A 

57 

MOV 

D,  A 

05BB 

3A2020 

LDA 

FPV22 

05  EE 

2F 

CMA 

05  EF 

C60  1 

ADI 

0 1  H 

05C 1 

322020 

STA 

FPV22 

05C4 

7A 

MOV 

A,D 

05C5 

CE00 

ACI 

00H 

05C7 

57 

MOV 

D,  A 

05C8 

3A2020 

DIV02: LDA 

FPV22 

05CB 

5F 

MOV 

E,  A 

05CC 

AF 

XRA 

A 

05CD 

67 

MOV 

H,  A 

05CE 

6F 

MOV 

L,  A 

SAVE  INT  REGISTERS 


CLEAR  A 

CLEAR  SIGN  FLAG  FOR 
POSITIVE  RESULT 
LOAD  MS  DIVIDEND  BYTE 
STORE 

SHIFT  BIT  7  TO  CY 
SKIP  IF  NUMBER  +VE 
LOAD  SIGN  FLAG 
COMPLEMENT 
STORE 

LOAD  MS  DIVIDEND 
COMPLEMENT 

LOAD  LS  DIVIDEND 

INCREMENT 

STORE 

ADD  CARRY  TO  C 
STORE 

LOAD  LS  DIVIDEND 
LOAD  MS  DIVISOR  BYTE 


SKIP  IF  NO  CARRY 
COMPLEMENT  SIGN  FLAG 
LOAD  MS  DIVISOR 


LOAD  LS  DIVISOR 


LOAD  LS  DIVIDER 

BC  -  DIVIDEND  MANTISSA 
DE  -  DIVISOR  MANTISSA 
TEST  FOR  0  DIVISOR 
CLEAR  A 

CLEAR  STACK  TOP  FOR  LATER  USE 


. 
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05CF 

E5 

PUSH  H 

05DO 

82 

ADD  D 

ADD  MS  DIVISOR  BYTE 

05D1 

C2E005 

JNZ  DIV03 

SKIP  IF  NOT  A  ZERO 

05D4 

83 

ADD  E 

ADD  LS  DIVISOR  BYTE 

05  D5 

C2E005 

JNZ  DIV03 

SKIP  IF  NOT  ZERO 

05D8 

F5 

PUSH  PSW 

ERROR  EXIT 

05D9 

E5 

PUSH  H 

05DA 

2100F7 

L XI  H , 0F700H 

LOAD  ERROR  CODE  8 

05DD 

C34000 

JMP  ERRFA 

DIVIDE  MANTISSAS 

05E0 

26  OF 

DI V03: MVI  H,OFH 

LOAD  COUNTER 

DIVIDE  LOOP 

05E2 

79 

DI VO 4: MOV  A,C 

LOAD  LS  DIVIDEND 

05E3 

93 

SUB  E 

SUB  LS  DIVISOR 

05E4 

6F 

MOV  L  ,  A 

STORE  RESULT 

05E5 

78 

MOV  A ,  B 

LOAD  MS  DIVIDEND 

05E6 

9A 

SBB  D 

SUB  MS  DEVISOR 

05E7 

DAF805 

JC  DIV05 

SKIP  IF  NEGATIVE  RESULT 

POS  RESULT,  REPLACE  DIVIDEND 
WITH  REMAINDER 

05EA 

47 

MOV  Br  A 

LOAD  MS  DIVIDEND 

05EB 

4D 

MOV  C,L 

LOAD  LS  DIVIDEND 

05EC 

E3 

XTHL 

SWAF  HL  WITH  STACK  TOP 

05ED 

37 

STC 

SET  CARRY 

05EE 

7D 

MOV  A, I 

LOAD  LS  QUOTIENT 

05EF 

17 

RAL 

ROTATE  CARRY  IN 

05F0 

6F 

MOV  L,A 

05F 1 

7C 

MOV  A,H 

LOAD  MS  QUOTIENT 

05F2 

17 

RAL 

05F3 

67 

MOV  H  r  A 

05F  4 

E3 

XTHL 

SWAP  HL,  WITH  STACK 

05F5 

C30106 

JMP  DIV06 

0518 

E3 

DIV05: XTHL 

NEG  RESULT 

05F9 

7D 

MOV  A,L 

LOAD  LS  QUOTIENT 

05FA 

A7 

ANA  A 

CLEAR  CARRY 

05FB 

17 

RAL 

SHIFT  IN  0 

05FC 

6F 

MOV  L  ,  A 

05FD 

7C 

MOV  A,H 

LOAD  MS  QUOTIENT 

05FE 

17 

RAL 

05FF 

67 

MOV  H  ,  A 

06  00 

E3 

XTHL 

ROTATE  DIVIDEND 

0601 

79 

DI V0 6 : MO V  A  ,  C 

LOAD  LS  DIVIDEND 

0602 

A7 

ANA  A 

CLEAR  CARRY 

0603 

17 

RAL 

ROTATE 

0604 

4F 

MOV  C  ,  A 

0605 

78 

MOV  A  ,  B 

LOAD  MS  DIVIDEND 

C606 

17 

RAL 

0607 

47 

MOV  B,  A 

0608 

25 

DCR  H 

DECREMENT  COUNTER 

0609 

C2E205 

JNZ  DIV04 

REPEAT  LOOP  IF  NOT  ZERO 
DIVISION  COMPLETE 
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06  0C 

79 

MOV  A,C 

060D 

93 

SUB  E 

06  0E 

78 

MOV  A,B 

060F 

9A 

SBB  D 

06  10 

DA1D06 

JC  DIV07 

0613 

El 

POP 

H 

0614 

7D 

MOV 

A  ,  L 

0615 

C60  1 

ADI 

0 1  H 

0617 

6F 

MOV 

L,  A 

0618 

7C 

MOV 

A  ,  H 

0619 

CEO  0 

ACI 

0  OH 

06  1 B 

67 

MOV 

H  ,  A 

061C 

E5 

PUSH 

[  H 

06  ID 

D 1 

DI V07: POP 

D 

06  IE 

212320 

LXI 

H, SHFT1 

0621 

72 

MOV 

M,D 

0622 

23 

INX 

H 

0623 

73 

MOV 

M,E 

06  24 

AF 

XRA 

A 

0625 

23 

INX 

H 

0626 

77 

MOV 

M,  A 

0627 

23 

INX 

H 

0628 

77 

MOV 

M,  A 

0629 

23 

INX 

H 

06  2  A 

3 A  1 E20 

LDA 

FPV13 

06  2D 

47 

MOV 

B,  A 

06  2E 

17 

RAL 

06  2F 

D23606 

JNC 

DIV08 

0632 

04 

INR 

B 

0633 

C35006 

JMP 

DIVIO 

0636 

04 

DIV08: INR 

B 

0637 

F24206 

jp  : 

DIV09 

063A 

F5 

PUSH  PSW 

063B 

E5 

PUSH  H 

06  3C 

21000E 

LXI  H , 0E00H 

06  3F 

C34000 

JMP  ERRFA 

0642 

3A2120 

DI V0 9 : LDA  FPV23 

0645 

4F 

MOV  C,A 

06  46 

17 

RAL 

0647 

DA5E06 

JC  DIV11 

064  A 

78 

MOV  A  ,  B 

SUBTRACT  DIVISOR  FROM 
DIVIDEND  TO  TEST 
FOR  ROUNDUP 

RESULT  NEG,  NO  ROUNDUP 
ADD  ROUNDUP 


LOAD  QUOTIENT 

INCREMENT  LS  BYTE 

LOAD  MS  BYTE 
ADD  CARRY 

PUSH  TO  COMPENSATE  FOR 
FOLLOWING  POP 
LOAD  QUOTIENT- 

LOAD  ADD  OF  SHIFT  LOCATIONS 
STORE  QUOTIENT  MANTISSA 


CLEAR  A 


POINT  H  AT  SHFT5 
SUBTRACT  EXPONENTS 


LOAD  DIVIDEND  EXPONENT 
STORE 

INCREMENT  EXP  TO  COMPENSATE 

FOR  EXTRA  LEADING  ZERO 

SHIFT  SIGN  TO  CY 

SKIP  FOR  + V E  EXP 

INCREMENT  DIVIDEND  EXP 

GO  TO  DIVISOR  EXP  TEST 

INCREMENT  EXPONENT 

IF  OVERFLOW  INTO  SIGN  BIT 

DID  NOT  OCCURR 

ERROR  EXIT  FOR  EXP  OVERFLOW 


LOAD  ERROR  CODE  7 

TEST  SECOND  EXPONENT 
LOAD  DIVISOR  EXPONENT 


BOTH  EXPONENTS  +VE 


. 

177 


064B 

91 

SUB  C 

SUB  DIVISOR  EXP 

064C 

77 

MOV  M,A 

STORE  RESULT  IN  SHIFT5 

064D 

C37C06 

JMP  DIV13 

JUMP  TO  DIV  13  ROUTINE 

06  50 

3A2120 

DI V  1 0 : LDA  FPV23 

TESI  SECOND  EXPONENT 

0653 

4F 

MOV  C , A 

SAVE  DIVISOR  EXP 

0654 

17 

PAL 

TEST  SIGN 

0655 

D26D06 

JNC  DI V 1 2 

JUMP  IF  SECOND  SIGN  +VE 

TWO  -  SIGNS 

0658 

78 

MOV  A  r  B 

0659 

91 

SUB  C 

SUB  DIVISOR  EXPONENT 

065A 

77 

MOV  M,A 

STORE  EXP 

06  5B 

C37C06 

JMP  DIV13 

DIVIDEND  EXP  +VE  AND 

DIVISOR  EXP  -VE 

06  5E 

78 

DIV11:MOV  A,E 

065F 

91 

SUB  C 

SUBTRACT 

0660 

77 

MOV  M,A 

STORE  RESULT 

0661 

17 

RAL 

0662 

D27C06 

JNC  DI VI 3 

SKIP  IF  NO  OVERFLOW 

INTO  SIGN  BIT 

0665 

F5 

PUSH  PSW 

ERROR  EXIT 

0666 

E5 

PUSH  H 

0667 

2100F6 

L XI  H , 0F6 00H 

LOAD  ERROR  CODE  9 

066  A 

C34000 

JMP  ERRFA 

DIVIDEND  EXP  -VE  AND 

DEVISOR  EXP  +  VE 

066D 

78 

DI V 1 2 : MO V  A,B 

066E 

91 

SUB  C 

SUE 1R  ACT 

066F 

77 

MOV  M  ,  A 

STORE  RESULT 

0670 

17 

RAL 

0671 

DA7C06 

JC  DIV13 

SKIP  IF  SIGN  BIT  NOT  CHANGED 

0674 

F5 

PUSH  PSW 

ERROR  EXIT 

0675 

E5 

PUSH  H 

06  76 

21F360 

L  XI  H,60F3H 

LOAD  ERROR  CODE  10 

0679 

C34000 

JMP  ERRFA 

06  7C 

El 

DIV 13: POP  H 

RESTORE  INT  REGISTERS 

06  7  D 

D 1 

POP  D 

067E 

Cl 

POP  B 

06  7F 

FI 

POP  PSW 

0680 

CDF BO 4 

CALL  NRMST 

NORMALIZE 

0683 

C9 

RET 
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0684 

F5 

ADD  ST: PUSH  PSW 

0685 

C5 

PUSH  B 

0686 

D5 

PUSH  D 

0687 

E5 

PUSH  H 

0688 

3A1E20 

LD A  FPV13 

068B 

47 

MOV  B,A 

06  8C 

3A2120 

LD A  FPV23 

068F 

4F 

MOV  C,A 

0690 

90 

SUB  B 

06  91 

57 

MOV  D,A 

06  92 

FAE006 

JM  ADD06 

0695 

DE  10 

SBI  1  OH 

06  97 

FA9D06 

JM  ADD 01 

06  9A 

C37E07 

JMP  ADD14 

06  9D 

59 

ADD0 1 : MOV  E,C 

069E 

3A1C20 

LDA  FPV11 

06  A 1 

67 

MOV  H, A 

06  A2 

3A1D20 

LDA  FPV12 

06  A5 

6  F 

MOV  L, A 

06A6 

E5 

PUSH  H 

06A7 

AF 

XRA  A 

06A8 

67 

MOV  H,A 

06  A9 

6  F 

MOV  L,A 

06  AA 

E3 

XTHL 

06  AB 

14 

INR  D 

06  AC 

7  C 

MOV  A, H 

06  AD 

A7 

ANA  A 

06  AE 

FABC06 

JM  ADD0 

06E1 

A7 

ADD02: ANA 

A 

06E2 

CDE307 

CALL 

,  FSRST 

06B5 

15 

DCR 

D 

06B6 

C2E106 

JNZ 

ADD02 

06B9 

C3C406 

JMP 

ADD04 

06  EC 

37 

ADD03: STC 

06BD 

CDB307 

CALL 

FSRST 

06C0 

15 

DCR 

D 

06C1 

C2BC06 

JNZ 

ADD03 

06C4 

E5 

ADD04: PUSH 

H 

SAVE  INTERNAL  REGISTERS 


LOAD  FIRST  EXPONENT 
STORE 

LOAD  SECOND  EXPONENT 
STORE 

SUB  1ST  EXPONENT  FROM  2ND 
SAVE  DIFFERENCE 
EXPONENT  1  IS  LARGER ,  JUMP 
TO  PROPER  ROUTINE,  ELSE 
EXP  2  GT  OR  EQU  TO  EXP  1 
SUBTRACT  16D 

SKIP  IS  EXPS  WITHIN  RANGE, 

ELSE  LEAVE  LARGER  NUMBER 

IN  RESULT  FILE 

JUMP  TO  END 

SAVE  LARGER  EXPONENT 

LOAD  MS  BYTE  OF  SMALLER  NO 

LOAD  LS  BYTE 

SAVE  MS  WORKSPACE  HALF 
CLEAR  A 

CLEAR  LS  WORKSPACE  HALF 

LOAD  MS  WORKSPACE  HALF 
INCREMENT  EXP  DIFFERENCE 
TO  GET  EXTRA  SHIFT  TO 
LEAVE  ROOM  FOR  OVERFLOW  BIT 
LOAD  MS  MANTISSA  BYTE 
TEST 

SKIP  IF  SIGN  -VE  ELSE  DO 
+VE  MANT  NORMALIZATION 


CLEAR  CARRY 

CALL  SHIFT  ROUTINE 

DECREMENT  COUNTER 

REPEAT  UNTIL  COUNTER  0 

LOAD  AND  SHIFT  OTHER  MANTISSA 

-VE  MANT  NORMALIZATION 


SET  CARRY 

CALL  SHIFT  ROUTINE 
DECREMENT  COUNTER 
REPEAT  LOOP  UNTIL  COUNTER  0 
PUSH  MS  WORKSPACE  HALF  ON  TOP 
OF  LS  HALF 
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06C5 

D5 

PUSH  D 

06C6 

D5 

PUSH  D 

C6C7 

3A2020 

LD A  FPV22 

06CA 

6F 

MOV  L , A 

06CB 

3A1F20 

LD A  FPV21 

06CE 

67 

MOV  H , A 

06CF 

A7 

ANA  A 

06D0 

FAD906 

JM  ADD05 

06D3 

CDB307 

CALL  FSRST 

06D6 

C33307 

JM P  ADD  1 2 

06D9 

37 

ADD05: STC 

06  DA 

CDB307 

CALL  FSRST 

06  DD 

C33307 

JMP  ADD12 

06E0 

C6  10 

ADD0  6: ADI  1  OH 

C6E2 

F2F306 

JP  ADD07 

06E5 

01 1C20 

LXI  B , FP V 1 1 

06  E8 

11 1F20 

LXI  D , FPV2 1 

06  EB 

2603 

MVI  H , 03H 

06  ED 

CD4F00 

CALL  BKMFA 

06F0 

C37E07 

JMP  ADD14 

06F3 

58 

ADD0 7 : MOV  E, B 

06F4 

3A1F20 

LDA  FPV21 

06F7 

67 

MOV  H , A 

06  F  8 

3A2020 

LDA  FPV22 

06FB 

6F 

MOV  L, A 

06  FC 

E5 

PUSH  H 

06  FD 

AF 

XR  A  A 

06FE 

67 

MOV  H , A 

06FF 

6F 

MOV  L, A 

0700 

E3 

XTHL 

07  01 

15 

DCR  D 

0702 

7  C 

MOV  A , H 

0703 

A7 

ANA  A 

0704 

F  A  1  2  0  7 

JM  ADD09 

0707 

A7 

ADD08: ANA 

A 

0708 

CDB307 

CALL 

FSRST 

07  0B 

14 

INR 

D 

070C 

C20707 

JNZ 

ADD08 

070F 

C31  A07 

JMP 

ADD  1  0 

SAVE  LARGER  EXP 

STACK  TOP  BECOMES  LS  HALF 

OF  SECOND  NUMBER 

LOAD  LS  BYTE  OF  MANTISSA 

OF  LARGER  NUMBER 

LOAD  MS  BYTE 

TEST,  CLEAR  CARRY 
SKIP  IF  MANTISSA  IS  NEG 
ELSE  SHIFT  RIGHT 
SHIFT  RIGHT 

JUMP  TO  ADDITION  OF  MANTISSA 
SET  CAREY 
SHIFT  IN  A  1 

JUMP  TO  ADDITION  OF  MANTISSAS 
EXPONENT  1  IS  LARGER 


ADD  16 

SKIP  IF  EXP  IN  RANGE 

ELSE  LOAD  LARGER  NO  TO  RESULT 

LOAD  BLOCKMOVE  DATA 


MOVE  DATA 
JUMP  TO  END 
SAVE  LARGER  EXP 
LOAD  MS  BYTE 

LOAD  LS  BYTE 

SAVE  MS  WORKSPACE  HALF 
CLEAR  A,H,L 


STORE  LS  WORKSPACE  HALF 
AND  LOAD  MS  HALF 
DECREMENT  -VE  DIFF  TO  GET 
AN  EXTRA  SHIFT 
LOAD  MS  MANTISSA  BYTE 
TEST 

SKIP  IF  -VE  ELSE 

POS  MANTISSA  NORMALIZATION 


CLEAR  CY 

CALL  NORMALIZATION  ROUTINE 
INCREMENT  COUNTER 
REPEAT  UNTIL  COUNTER  0 
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0712 
0713 
0716 
0717 
07  1  A 
07  IB 
07  1C 

07  ID 

07  20 
0721 
0724 
0725 
0726 

0729 

072C 


072F 

0730 


0733 

0734 

0735 

0736 

0737 

0738 

0739 

073A 
07  3B 
073C 
07  3D 
073E 
073F 
0740 
0741 


-VE  EXP  NORMALIZATION 


37 

ADD09: STC 

SET  CARRY 

CDB307 

CALL  FSRST 

SHIFT  IN  A  1 

14 

INR  D 

INCREMENT  COUNTER 

C212.07 

JNZ  ADD09 

REPEAT  UNTIL  COUNTER  0 

E5 

ADD  10: PUSH  H 

PUSH  MS  WORKSPACE  HALF 

D5 

PUSH  D 

SAVE  LARGER  EXPONENT 

D5 

PUSH  D 

STACK  TOP  BECOMES  LS  HALF 

OF  SECOND  NUMBER 

3A1D20 

LDA  FPV12 

LOAD  LS  BYTE  OF  MANTISSA  OF 
LARGER  NUMBER 

6F 

MOV  L,A 

3A1C20 

LDA  FPV11 

LOAD  MS  BYTE 

67 

MOV  H , A 

A7 

ANA  A 

TEST,  CLEAR  CY 

FA2F07 

JM  ADD  1 1 

SKIP  IF  MANTISSA  NEG, 

ELSE  SHIFT  RIGHT 

CDB307 

CALL  FSRST 

SHIFT  RIGHT 

C33307 

JMP  ADD12 

JUMP  TO  MANTISSA  ADDITION 

SHIFT  RIGHT  FOR  -VE  MANTISSA 

37 

ADD  1 1 : STC 

SET  CARRY 

CDB307 

CALL  FSRST 

SHIFT  IN  A  1 

ADDITION  OF  MANTISSAS 


E  -  LARGER  EXPONENT 

HL  -  MS  HALF  OF  MANTISSA 

OF  LARGER  NUMBER 

STACK  TOP  -  LS  BYTE 

S-T.  +  2  -  LARGER  EXPONENT 

S.  T.  +  4  -  MS  HALF  OF  MANT 

OF  SMALLER  NUMBER 

S.  T.  +  6  -  LS  HALF  OF  MANT 


44 

ADD  12: MOV 

B,H 

MOVE  2  MS  BYTES  OF  MANTISS 
OF  LARGER  NUMBER 

4D 

MOV 

C,L 

El 

POP 

H 

POP  LS  MANTISSA  BYTE  OF 
LARGER  NUMBER 

54 

MOV 

D,  H 

MOVE  TO  D 

El 

POP 

H 

LOAD  LARGER  EXPONENT 

5D 

MOV 

E,  L 

STORE 

El 

POP 

H 

POP  MS  HALF  OF  MANTISSA  OF 
SMALLER  NUMBER 

E3 

XTHL 

LOAD  LS  HALF  OF  WORK  SPACE 

7C 

MOV 

A,  H 

LOAD  3RD  BYTE 

82 

ADD 

D 

67 

MOV 

H,  A 

E3 

XTHL 

LOAD  MS  HALF  OF  WORK  SPACE 

7D 

MOV 

A  ,  L 

LOAD  AND  ADD  2ND  BYTE 

89 

ADC 

C 

4F 

MOV 

C,  A 

. 


. 
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0742 

1C 

MOV 

A  ,  H 

0743 

88 

ADC 

B 

0744 

47 

MOV 

B,  A 

0745 

7B 

MOV 

A,E 

0746 

D  1 

POP 

D 

0747 

212720 

LXI 

H , SHFT5 

07  4  A 

3C 

INR 

A 

074B 

77 

MOV 

M,  A 

C74C 

AF 

XR  A 

A 

074D 

322220 

STA 

SIGNF 

0750 

78 

MOV 

A,  B 

0751 

A7 

ANA 

A 

0752 

F27307 

JP  i 

&DD13 

0755 

2F 

CM  A 

0756 

47 

MOV 

B,  A 

0757 

79 

MOV 

A,C 

0758 

2F 

CM  A 

0759 

4F 

MOV 

C,  A 

C75A 

7  A 

MOV 

A,D 

075B 

2F 

CM  A 

075C 

57 

MOV 

D,  A 

075D 

7B 

MOV 

A,  E 

075E 

2F 

CM  A 

075F 

C601 

ADI 

0  1  H 

0761 

5F 

MOV 

E,  A 

0762 

7A 

MOV 

A,  D 

0763 

CE00 

ACI 

00 

0765 

57 

MOV 

D,  A 

0766 

79 

MOV 

A,C 

0767 

CE00 

ACI 

00H 

0769 

4F 

MOV 

C,  A 

076A 

78 

MOV 

A,B 

076B 

CE00 

ACI 

00H 

07  6D 

47 

MOV 

B,  A 

076E 

3EFF 

MVI 

A , 0FFH 

0770 

322220 

STA 

SIGNF 

0773 

2B 

ADD  1  3 

:  DCX 

H 

0774 

73 

MOV 

MrE 

0775 

2B 

DCX 

H 

0776 

72 

MOV 

M  ,  D 

0777 

2B 

DCX 

H 

0778 

71 

MOV 

M,C 

0779 

2B 

DCX 

H 

077A 

70 

MOV 

M  f  B 

077B 

CDFE04 

CALL  NRMST 

077E 

El 

ADD  1  4 

:  POP 

H 

077F 

D 1 

POP 

D 

0780 

Cl 

POP 

B 

LOAD  AND  ADD  MS  BYTE 


LOAD  EXPONENT 
LOAD  LS  2  BYTES  TO  DE 
SET  POINTED  TO  NORMALIZATION 
ROUTINE  DATA  EILE 
INCREMENT  EXPONENT  TO 
COMPENSATE  FOR  EXTRA  SHIFT 
STORE  FOR  NORMALIZATION 
CLEAR  A 

CLEAR  SIGN  FLAG 

LCAD  MS  MANTISSA  BYTE 

TEST 

SKIP  NEXT  LINES  IF  MATISSA 
POSITIVE,  ELSET 

COMPLEMENT  MANT,  SET  SIGNF 


COMPLEMENT  MS  EYTE 


COMPLEMENT  2ND  BYTE 


COMPLEMENT  3RD  BYTE 


COMPLEMENT  LS  BYTE 
INCREMENT  LS  BYTE 


ADD  CARRY 


ADD  CY  TO  2ND  BYTE 


ADD  CY  TO  MS  BYTE 


SET  SIGN  FLAG  FOR  -  SIGN 
STORE  LS  BYTE 


STORE  LS  BYTE 
NORMALIZE 

RESTORE  INT  REGISTERS 


. 

* 
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0781  FI  POP  PSW 

0782  C9  RET  DONE 


Floating  Point  Subtraction 


0783 

F5 

SUB  ST: PUSH 

PSW 

0784 

E5 

PUSH 

H 

0785 

C5 

PUSH 

B 

0786 

21 1F20 

L  XI 

H,FPV21 

0785 

7E 

MOV 

A,  M 

078A 

2F 

CM  A 

078B 

47 

MOV 

B,  A 

078C 

23 

INX 

H 

078D 

7E 

MOV 

A  ,  M 

078E 

2F 

CMA 

07  8F 

C60  1 

ADI 

01  H 

C791 

77 

MOV 

M,  A 

0792 

78 

MOV 

A,  B 

0793 

CE00 

ACI 

00H 

0795 

2B 

DCX 

H 

C796 

77 

MOV 

M,  A 

0797 

CD8406 

CALI 

,  ADDST 

07  9A 

Cl 

POP 

B 

079B 

El 

POP 

H 

079C 

FI 

POP 

PSW 

079D 

C9 

RET 

Four 

Byte  Shift 

Left 

07  9E 

F3 

FSLST: DI 

079F 

33 

INX  SP 

07AO 

33 

INX  SP 

07  A 1 

E3 

XTHL 

07  A2 

7D 

MOV  A,L 

07  A3 

17 

RAL 

SAVE  INTERNAL  REGISTERS 


COMPLEMENT  MINUEND 


POINT  TO  MINUEND 
LOAD  MS  MANTISSA  BYTE 
COMPLEMENT 


LOAD  LS  MANTISSA  EYTE 

COMPLEMENT 

INCREMENT 

STORE  IN  MEMORY 

LOAD  COMPLEMENTED  MS  EYTE 

ADD  CARRY 

STORE  IN  MEMORY 

ADD  INVERTED  MINUEND  TO 

SUBTRAHEND 

RESTORE  INTERNAL  REGISTERS 


DONE 


HL  -MS  2  BYTES 

STACK  TOP  -  LS  2  BYTES 

CY  -  VALUE  TO  EE  SHIFTED  IN 

DISABLE  INTERRUPTS  TO 

PREVENT  ERRORS  DUE  TO 

STACK  MANIPULATION 

MOVE  STACK  POINTER 

TO  STORED  DATA 

LOAD  LS  WORKSPACE  HALF 

SHIFT  LS  BYTE 
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07  A4 

6F 

MOV  L,A 

07A5 

1C 

MOV  A,H 

07A6 

17 

RAL 

C7A7 

67 

MOV  H,A 

07A8 

E3 

XTHL 

07A9 

7  D 

MOV  A,L 

07  AA 

17 

RAL 

07  AB 

6F 

MOV  L,A 

07  AC 

1C 

MOV  A,H 

07  AD 

17 

RAL 

07  AE 

67 

MOV  H , A 

07  AF 

3B 

DCX  SP 

07  E0 

3B 

DC X  SP 

07B1 

FB 

El 

07B2 

C9 

RET 

Four 

Bvte 

Shift  Riqht 

07B3 

F3 

FSRST: DI 

07B4 

33 

INX  SP 

07B5 

33 

INX  SP 

07B6 

1C 

MOV  A,H 

C7B7 

IF 

RAR 

07B8 

67 

MOV  H,A 

07B9 

7D 

MOV  A,L 

07BA 

IF 

RAR 

C7BB 

6F 

MOV  L, A 

07  BC 

E3 

XTHL 

07BD 

1C 

MOV  A,H 

07  BE 

IF 

RAR 

07  EF 

67 

MOV  H , A 

07C0 

7D 

MOV  A,L 

07C1 

IF 

RAR 

07  C2 

6F 

MOV  L, A 

07C3 

E3 

XTHL 

07C4 

3B 

DCX  SP 

07C5 

3B 

DCX  SP 

07C6 

FB 

El 

07C7 

C9 

RET 

SHIFT  3 ED  BYTE 

LOAD  MS  WORKSPACE  HALF 

SHIFT  2ND  BYTE 

SHIFT  MS  BYTE 

RESTORE  STACK  POINTER 
TO  RETURN  ADDRESS 
RENAELE  INTERRUPTS 
DONE 


SIMILAR  TO  4  BYTE  SHIFT  LEFT 

SHIFT  MS  BYTE 

SHIFT  2ND  BYTE 

LOAD  LS  WORKSPACE  HALF 

SHIFT  3RD  BYTE 

SHIFT  LS  BYTE 

LOAD  MS  WORKSPACE  HALF 


. 
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Forwarding  Addresses 


0800  C30608  DTBFA : JMP  DTBST 
0803  C3DA08  BTDF A: JMP  BTDST 


Floating  Point  Decimal  to  Binary  Conversion 


0806 

F5 

DTBST: PUSH  PSW 

0807 

C5 

PUSH  B 

0808 

D5 

PUSH  D 

0809 

E5 

PUSH  H 

080A 

AF 

XRA  A 

080B 

67 

MOV  H , A 

080C 

6F 

MOV  L,A 

08  0D 

4F 

MOV  C,A 

08  0E 

0603 

MVI  B,03H 

0810 

C5 

PUSH  B 

0811 

112920 

LXI  D,DECV1 

0814 

322220 

STA  SIGNF 

0817 

1 A 

LDAX  D 

0818 

13 

INX  D 

0819 

A7 

ANA  A 

081 A 

CA2208 

JZ  DTB01 

C81D 

3EFF 

MVI  A,0FFH 

08  IF 

322220 

STA  SIGNF 

0822 

1  A 

DTB01: LDAX 

:  D 

0823 

13 

INX 

D 

0824 

85 

ADD 

L 

0825 

6F 

MOV 

L,  A 

0826 

79 

MOV 

A,C 

0827 

8C 

ADC 

H 

0828 

67 

MOV 

H,  A 

0829 

44 

MOV 

B,  H 

C82A 

4  D 

MOV 

C,  L 

C82B 

7D 

MOV 

A ,  L 

082C 

17 

RAL 

08  2D 

6F 

MOV 

L,  A 

082E 

1C 

MOV 

A,H 

082F 

17 

RAL 

0830 

67 

MOV 

H,  A 

0831 

7D 

MOV 

A,  L 

0832 

17 

RAL 

0833 

6F 

MOV 

L,  A 

0834 

7C 

MOV 

A  ,  H 

SAVE  INTERNAL  REGISTERS 


CLEAR  A,H,L,C 


LOAD  COUNTER 
STORE  COUNTER 
SET  POINTER  TO  START  OF 
DECIMAL  NUMBER  FILE 
CLEAR  SIGN  FLAG 
LOAD  SIGN  BYTE 
INCREMENT  POINTER 
TEST 

SKIP  IF  SIGN  +VE 
LOAD  CODE  FOR  -  SIGN 
STORE  SIGN  FLAG 

CONVERT  MANTISSA 


LOAD  DIGIT 
INCREMENT  POINTER 
ADD  L 

CLEAR  A 

ADD  H ,  CARRY  IS  CLEAR 
STORE 


SHIFT  LEFT 


HL  NOW  MULT  BY  2 
SHIFT  AGAIN 


. 


- 
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0835 

17 

RAL 

0836 

67 

MOV  H , A 

0837 

09 

DAD  B 

0838 

7  D 

MOV  A , L 

0839 

17 

RAL 

C83A 

6F 

MOV  L , A 

083B 

7C 

MOV  A , H 

C83C 

17 

RAL 

083D 

67 

MOV  H, A 

C83E 

Cl 

POP  B 

083F 

05 

DCR  B 

0840 

C5 

PUSH  B 

0841 

C22208 

JNZ  DTB01 

C844 

Cl 

POP  B 

0845 

1  A 

LDAX  D 

0846 

13 

IN  X  D 

0847 

85 

ADD  L 

0848 

6F 

MOV  L , A 

0849 

79 

MOV  A , C 

084  A 

8C 

ADC  H 

084B 

67 

MOV  H , A 

084C 

E5 

PUSH  H 

C84D 

212720 

LXI  H , SHFT5 

0850 

36  OF 

MVI  M , 0FH 

0852 

2B 

DCX  H 

0853 

71 

MOV  M , C 

0854 

2B 

DCX  H 

0855 

71 

MOV  M , C 

0856 

2B 

DCX  H 

0857 

Cl 

POP  B 

0858 

71 

MOV  M , C 

0859 

2B 

DCX  H 

085A 

70 

MOV  M , B 

085B 

CD0C04 

CALL  NRMFA 

085E 

21 1C20 

LXI 

H , FP V 1 1 

0861 

3641 

MVI 

M  ,  4 1 H 

0863 

23 

INX 

H 

0864 

3689 

MVI 

M ,  89H 

0866 

23 

INX 

H 

0867 

36F7 

MVI 

M , 0F7H 

0869 

CD0004 

CALL 

,  MULFA 

086C 

EB 

XCHG 

086D 

7E 

MOV 

A,  M 

086E 

23 

INX 

H 

086F 

A7 

ANA 

A 

0870 

C2A408 

JNZ 

DTB05 

HL  NOW  MULT  BY  4 
ADD  B,  NOW  X  5 
SHIFT  LEFT  AGAIN 


HL  NOW  X  10 

LOAD  COUNTER,  CLEAR  C 

DECREMENT  COUNTER 

SAVE  DECREMENTED  COUNTER 

REPEAT  LOOP  IF 

COUNTER  NOT  ZERO 

CLEAR  COUNTER  FROM  STACK 

LOAD  LAST  DIGIT 

INCREMENT  POINTER 

ADD  TO  L 

CLEAR  A 
ADD  CY  TO  H 

BINARY  MANTISSA  NOW  IN  HL 

STORE  DATA 

LOAD  DATA  ADDRESS 

FOR  SHIFT  ROUTINE 

LOAD  EXP  TO  COMPENSATE  FOR 

POSN  OF  BINARY  POINT,  1 5D 

CLEAR  LS  BYTE 

CLEAR  NEXT  BYTE 

RELOAD  DATA 

STORE  NEXT  DATA  BYTE 

LOAD  MS  DATA  BYTE 
CALL  NORMALIZATION  ROUTINE 
BINARY  RESULT  NOW  IN  FPV2N 
MULT  BY  .001  TO  COMPENSATE 
FOR  MOVED  DECIMAL  POINT 
SET  DATA  POINTER 
LOAD  BINARY  .001 


MULTIPLY  BY  .001 

MOVE  DEC  DATA  POINTER  TO  HL 

LOAD  EXPONENT  SIGN  FLAG 

TEST 

SKIP  TO  -  EXPONENT 
NORMALIZATION  ROUTINE, 

ELSE  DO 


' 
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0873 

46 

MOV 

B,  M 

0874 

23 

INX 

H 

0875 

4E 

MOV 

C  ,  M 

08  76 

21 1C20 

L  XI 

H , FP V 1 1 

C87S 

3650 

M  VI 

M  ,  50H 

087B 

23 

INX 

H 

087C 

3600 

M  VI 

M  ,  00H 

087E 

23 

INX 

H 

C87F 

3604 

M  VI 

M  ,  04H 

0881 

79 

DTB02: MOV  A , C 

0882 

A7 

ANA  A 

0863 

CA8D08 

JZ  DTB03 

0866 

0D 

DCE  C 

0887 

CD0004 

CALL  MULFA 

088A 

C38108 

JMP  DTB02 

08  8D 

21 1C2  0 

DTB03: LXI 

H , FP V  1 1 

0890 

36  4  A 

M  VI 

M ,  4AH 

0892 

23 

INX 

H 

0893 

3681 

M  VI 

M  ,  81  H 

0895 

23 

INX 

H 

0896 

3622 

MVI 

M  ,  22H 

0898 

78 

DTB04: MOV 

A  ,  B 

0899 

A7 

ANA 

A 

08  9  A 

CAD508 

JZ  DTB09 

089D 

05 

DCR 

B 

089E 

CD0004 

CALI 

,  MULFA 

08A1 

C39808 

JMP 

DTE04 

08A4 

46 

DTB05: MOV 

B,  M 

C8A5 

23 

INX 

H 

08A6 

4E 

MOV 

C  ,  M 

08A7 

21 1C20 

LXI 

H  , FPV 1 1 

08  AA 

3666 

MVI 

M  ,  66H 

08  AC 

23 

INX 

H 

08  AD 

3666 

MVI 

M,  66H 

08  AF 

23 

INX 

H 

08  B0 

36FD 

MVI 

M , 0FDH 

08B2 

79 

DTB06: MOV 

A  ,  C 

+  SIGN  NORMALIZATION  ROUTINE 


LOAD  MS  EXPONENT  DIGIT 

LOAD  LS  EXPONENT  DIGIT 
EXPONENT  STORED  IN  EC 
LOAD  MULTIPLIER  ADDRESS 
LOAD  BINARY  10 


COMPENSATE  FOR  LOW  ORDER 


EXPONENT  DIGIT 


LOAD  LS  DIGIT 
TEST 

SKIP  TO  NEXT  DIGIT  IF  ZERO 
DECREMENT  EXPONENT 
MULTIPLY  FPV2N  BY  10 
RETURN  AND  REPEAT  LOOP 

COMPENSATE  FOR  HIGH  ORDER 


EXPONENT  DIGIT 


LOAD  MULTIPLIER  ADDRESS 
LOAD  BINARY  1E10 


LOAD  MS  DIGIT 
TEST 

DONE,  GO  TO  END 
DECREMENT  EXPONENT  DIGIT 
MULT  FPV2N  BY  100 
RETURN  AND  REPEAT  LOOP 

-VE  EXPONENT  NORMALIZATION 


LOAD  MS  EXPONENT  DIGIT 

LOAD  LS  EXPONENT  DIGIT 
LOAD  DIVISOR  ADDRESS 
LOAD  WITH  BINARY  . 10 


LOAD  LS  DIGIT 
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08B3 

A7 

ANA 

A 

08  E  4 

CABE08 

JZ  DTB07 

08E7 

0D 

DCR 

C 

C8E8 

CD0004 

CALL 

.  MULFA 

08BB 

C3B208 

JMP 

DTB06 

08  BE 

21 1 C20 

DTB07: LXI 

H, FPV 1 

08C1 

366D 

M  VI 

M ,  6DH 

08C3 

23 

INX 

H 

08C4 

36F4 

M  VI 

M  ,0F4H 

C8C6 

23 

INX 

H 

08C7 

36  DF 

MV  I 

M , ODFH 

08C9 

78 

DTB08: MOV 

A,  B 

08CA 

A7 

ANA 

A 

08CB 

CAD508 

JZ  DTB09 

08CE 

05 

DCR 

B 

08CF 

CD0004 

CALL 

MULFA 

C8D2 

C3C908 

JMP 

DTE08 

TEST 

DIGIT  ZERO,  GO  TO  ROUTINE  TO 

NORMALIZE  NEXT  DIGIT 

DECREMENT  EXPONENT 

MULTIPLY  BY  .10 

REPEAT  LOOP 

LOAD  DIVISOR  ADDRESS 

LOAD  WITH  BINARY  IE-10 


LOAD  MS  DIGIT 
TEST 

DONE,  GO  TO  END 
DECREMENT  EXPONENT  DIGIT 
MULTIPLY  FPV2N  BY  IE-10 
REPEAT  LOOP 


END 


BINARY  VALUE  IN  FPV2N 


08D5 

El 

DTB09: POP 

H 

RETURN  INTERNAL  REGISTERS 

08D6 

D 1 

POP 

D 

08D7 

Cl 

POP 

B 

08D8 

FI 

POP 

PSW 

08D9 

C9 

RET 

DONE 

Floatinq  Point  Binary 

to  Decimal  Conversion 

08DA 

F5 

BTDST: PUSH 

PSW 

SAVE  INTERNAL  REGISTERS 

08  DB 

C5 

PUSH 

B 

08DC 

D5 

PUSH 

;  D 

08DD 

E5 

PUSH 

H 

TEST  FOR  ZERO  MANTISSA 

08DE 

3A1F20 

LDA 

FPV21 

LOAD  MS  MANT  BYTE 

08E1 

A7 

ANA 

A 

TEST 

08E2 

C2F408 

JNZ 

BTD02 

NOT  ZERO,  CONVERT,  ELSE 
OUTPUT  DECIMAL  0 

08E5 

212920 

LXI 

H , DEC V 1 

DESTINATION  POINTER 

08E8 

0608 

M  VI 

B,  08H 

LOAD  COUNTER 

08  EA 

AF 

XRA 

A 

CLEAR  A 

08EB 

77 

BTD0  1 : MO V 

M,  A 

CLEAR  DECIMAL  DATA 

08EC 

23 

INX 

H 

08ED 

05 

DCR 

B 

DECREMENT  COUNTER 

08  EE 

C2EB08 

JNZ 

BTD01 

REPEAT 

08f  1 

C34A0A 

JMP 

BTD0E 

GO  TO  END 

. 
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08F4 

AF 

BTD02: XE A 

A 

08F5 

5F 

MOV 

E,  A 

08F6 

212120 

L  XI 

H,FPV23 

08F  9 

7E 

MOV 

A,M 

08F  A 

3C 

INR 

A 

08FB 

77 

MOV  M  ,  A 

08FC 

A7 

ANA  A 

08FD 

FA220S 

JM  BTD04 

0900 

21 1C20 

LXI 

H , FP V 1 1 

0903 

3666 

M  VI 

M,  66H 

0905 

23 

INX 

H 

0906 

3666 

MVI 

M,  66H 

0908 

23 

INX 

H 

09  09 

36FD 

MVI 

M , 0FDH 

09  0B 

212120 

LXI 

H  r  FPV23 

090E 

CD  0004 

BTD03: CALI 

,  MULFA 

0911 

1C 

INR 

E 

0912 

7E 

MOV 

A,  M 

0913 

A7 

ANA 

A 

0914 

F20E09 

JP  BTD03 

0917 

21 1F20 

LXI 

H , FPV2 1 

09  1 A 

46 

MOV 

B,  M 

09  1 B 

23 

INX 

H 

09  1C 

4E 

MOV 

C,M 

09  ID 

23 

INX 

H 

09  IE 

6E 

MOV 

L,  M 

09  IF 

C34809 

JM  P 

BTD06 

0922 

21 1C20 

BTD04:LXI 

H,FPV1 1 

0925 

3650 

MVI 

M  ,  50H 

0927 

23 

INX 

H 

0928 

3600 

MVI 

M,  00H 

092A 

23 

INX 

H 

092B 

3604 

MVI 

M,04H 

092D 

21 1F20 

BTD05: LXI 

H,FPV21 

0930 

46 

MOV 

B,M 

0931 

23 

INX 

H 

0932 

4E 

MOV 

C,  M 

0933 

23 

INX 

H 

0934 

56 

MOV 

D,  M 

0935 

CD0004 

CALL  MULFA 

0938 

ID 

DCR 

E 

0939 

7E 

MOV 

A  ,  M 

CLEAR  A 

STOEE  0  DECIMAL  EXPONENT 

POINT  TO  EXPONENT 

LOAD 

MULT  DATA  BY  2  TO  PEOVIDE 
EXTEA  SHIFT  LEFT  TO 
COMPENSATE  FOE  SIGN  BIT 
WHEN  SHIFTING  OUT  DECIMAL 
DIGITS 

STOEE  NEW  EXPONENT 
TEST 

SKIP  TO  EOUTINE  FOE 

-VE  EXPONENT  NOEM ALIZATION 

+  EXPONENT  NOEM ALIZATION 


LOAD  POINTEE 
LOAD  BINAEY  .  10 


SET  POINTEE  TO  EXP 

OF  NUMBEE  BEING  CONVEETED 

MULTIPLY  BY  .  10 

INCEEMENT  DECIMAL  EXPONENT 

LOAD  NEW  EXPONENT 

TEST 

EEPEAT  LOOP 

LOAD  DATA  POINTEE 

LOAD  BINAEY  MANTISSA 


LOAD  BINAEY  EXPONENT 
NEXT  NO EM ALIZATION  STAGE 

-  EXPONENT  NOEM ALIZ ATION 


LOAD  POINTEE 
LOAD  BINARY  10 


LOAD  DATA  POINTER 

STORE  DATA  BEFORE  MULTIPLYING 


MULT  BY  10 

DECR  DECIMAL  EXPONENT 
LOAD  NEW  BINAEY  EXPONENT 


. 

. 


. 
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093A 

A7 

ANA 

A 

093B 

FA2D09 

JM  BTD05 

093E 

1C 

INR 

E 

093F 

21  1F20 

LXI 

H , FPV2 1 

09  42 

70 

MOV 

M,  B 

0943 

23 

IN  X 

H 

0944 

71 

MOV 

M  ,  C 

0945 

23 

INX 

H 

0946 

72 

MOV 

M  ,  D 

0947 

6A 

MOV 

L  ,  D 

0948 

AF 

BTD06 : XRA 

A 

09  49 

57 

MOV 

D,  A 

09  4A 

67 

MOV 

H,  A 

094B 

78 

MOV 

A,  B 

094C 

A7 

ANA 

A 

09  4D 

F25B09 

JP  BTD07 

0950 

2F 

CM  A 

0951 

47 

MOV 

B,  A 

09  52 

79 

MOV 

A ,  C 

0953 

2F 

CM  A 

0954 

C60  1 

ADI 

01  H 

0956 

4F 

MOV 

C,  A 

C957 

78 

MOV 

A  ,  B 

0958 

8C 

ADC 

H 

0959 

47 

MOV 

B,  A 

095A 

15 

ECR 

D 

095B 

7D 

BTD07 : MOV 

A  ,  L 

095C 

A7 

ANA 

A 

095D 

CA6D09 

JZ  BTD09 

0960 

78 

BTD08: MOV 

A  ,  B 

0961 

IF 

RAR 

0962 

47 

MOV 

B,  A 

0963 

79 

MOV 

A  ,  C 

0964 

IF 

RAR 

0965 

4F 

MOV 

C,  A 

0966 

7C 

MOV 

A  ,  H 

0967 

IF 

RAR 

0968 

67 

MOV 

H,  A 

0969 

2C 

INR 

L 

09  6  A 

C26009 

JNZ 

BTD0 

TEST 

REPEAT  LOOP  IF  EXP  SITLL  -VE 

EXPONENT  NOW  +VE 

INC R  DECIMAL  EXP  TO 

CANCEL  LAST  MULTIPLY 

LOAD  DATA  ADDRESS  POINTER 

RESTORE  VALUES  BEFORE 

LAST  MULTIPLICATION 


STORE  BIN  EXP 
EXPONENT  REDUCTION  BY 


MANTISSA  SHIFTING 


BC  -  BINARY  MANTISSA 
E  -  DECIMAL  EXPONENT 
L  BINARY  EXPONENT 
CLEAR  A,H,D 

D  -  MANTISSA  SIGN  FLAG 
H  -  MANTISSA  UNDERFLOW  BYTE 
LOAD  MS  MANTISSA  BYTE 
TEST 

SKIP  IF  MANTISSA  POSITIVE 
COMPLEMENT 

LOAD  LS  MANTISSA  BYTE 

COMPLEMENT 

INCREMENT 


ADD  CY,  H  CLEAR- 

SET  -  SIGN  FLAG 
LOAD  BINARY  EXPONENT 
TEST,  CLEAR  CY 

EXPONENT  ZERO,  SHIFTING  DONE 
SHIFT  MANTISSA  RIGHT 
SHIFT  MS  BYTE 


SHIFT  LS  BYTE 


SHIFT  CY  INTO  UNDERFLOW  BYTE 

INCREMENT  BINARY  EXPONENT, 
UPDATE  ZERO  FLAG 
REPEAT  LOOP  IF  BINARY 
EXPONENT  STILL  NEGATIVE 
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096D 

7  A 

BTD09: MOV 

A  ,  D 

096E 

54 

MOV 

D  ,  H 

096F 

212920 

LXI 

H, DECV1 

0972 

77 

MOV 

M,  A 

0973 

23 

INX 

H 

0974 

D5 

PUSH  D 

0975 

1  E05 

MV I  E , 05H 

0977 

E5 

BTD  10: PUSH  H 

0978 

E5 

PUSH  H 

0979 

A7 

ANA  A 

097A 

7A 

MOV  A , D 

097E 

17 

RAL 

0S7C 

6F 

MOV  L, A 

09  7D 

79 

MOV  A , C 

C97E 

17 

RAL 

09  7F 

67 

MOV  H , A 

0980 

E3 

XTHL 

0981 

78 

MOV  A ,  B 

0982 

17 

RAL 

0983 

6F 

MOV  L , A 

0984 

3E00 

M VI  A , 00H 

0986 

17 

RAL 

0987 

67 

MOV  H , A 

0988 

CD0F04 

CALL  FSLFA 

098B 

E3 

XTHL 

098C 

7D 

MOV  A , L 

098D 

82 

ADD  D 

09  8E 

6F 

MOV  L , A 

09  8F 

7C 

MOV  A , H 

0990 

89 

ADC  C 

0991 

67 

MOV  H , A 

0992 

E3 

XTHL 

0993 

7D 

MOV  A , L 

0994 

88 

ADC  B 

0995 

6F 

MOV  L, A 

0996 

7C 

MOV  A , H 

0997 

CE00 

ACI  00H 

0999 

67 

MOV  H , A 

C9SA 

CD0F04 

CALL  FSLFA 

099D 

45 

MOV  B , L 

C99E 

7C 

MOV  A , H 

SHIFT  OUT  DECIMAL  DIGITS 


LOAD  MANTISSA  SIGN  FLAG 
STORE  MANTISSA  UNDERFLOW  BYTE 
LOAD  DECIMAL  DATA  POINTER 
STORE  SIGN  BYTE 

HL  -  DATA  POINTER 
EC  -  POS  BINARY  MANTISSA 
D  -  MANTISSA  UNDERFLOW  BYTE 
E  -  DECIMAL  EXPONENT  IN 

TWOS  COMPLEMENT  BINARY 
STORE  DECIMAL  EXPONENT 
LOAD  COUNTER 
PUSH  ADDRESS  POINTER 
CLEAR  TOP  OF  STACK  TO  USE  HL 
AND  STACK  TOP  AS  4  BYTE 
WORK  SPACE 
CLEAR  CARRY 
LOAD  UNDERFLOW  BYTE 
SHIFT 

LOAD  LS  MANTISSA  BYTE 


SWITCH  WORK  SPACE  BYTES 
LOAD  MS  MANTISSA  BYTE 


CLEAR  A 

SHIFT  CY  TO  OVERFLOW  BYTE 
CLEAR  CY 

SHIFT  WS  LEFT  ONCE  MORE 
GET  LS  HALF  OF  WS 
ADD  UNSHIFTED  BINARY  MANTISSA 
TO  GET  X  5  PRODUCT 


GET  MS  HALF  OF  WS 


ADD  CY,  CLEAR  CY 

SHIFT  WS  TO  GET  X  10  PROD 
STORE  NEW  DATA 
STORE  MS  MANTISSA  BYTE 
STORE  OVERFLOW  BYTE  IN  A 


. 
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099F 

E3 

XTHL 

09  AO 

4  C 

MOV  C, H 

09  A 1 

55 

MOV  D , L 

09  A2 

El 

POP  H 

09  A3 

El 

POP  H 

09  A4 

F5 

PUSH  PSW 

09A5 

7B 

MOV  A , E 

09A6 

EE05 

XEI  05H 

C9A8 

C2B609 

JNZ  BTD11 

09  AB 

FI 

POP  PSW 

09  AC 

A7 

ANA  A 

09  AD 

C2B709 

JNZ  BTD12 

09B0 

E3 

XTHL 

09B1 

2D 

DCR  L 

09  B2 

E3 

XTHL 

09B3 

C37709 

JMP  BTD10 

09B6 

FI 

BTD 1 1: POP  PSW 

09B7 

ID 

ETD 1 2: DCR  E 

09B8 

CAC009 

JZ  BTD 1 3 

09BB 

77 

MOV 

M,  A 

09  BC 

23 

INX 

H 

09BD 

C37709 

JMP 

BTD  1  0 

09C0 

D605 

BTD 1 3: SUI 

05 

09C2 

F  A  0  7  0  A 

JM  : 

BTD  1 4 

09C5 

212D20 

L  XI 

H , DEC V5 

09C8 

7E 

MOV 

A,  M 

09C9 

3C 

INR 

A 

09CA 

27 

DA  A 

09CB 

77 

MOV 

M,  A 

09CC 

E6F0 

ANI 

OF  OH 

09CE 

CA070A 

JZ  ] 

BTD  1  4 

09D 1 

7E 

MOV 

A  ,  M 

09D2 

E60F 

ANI 

0FH 

09D4 

77 

MOV 

M,  A 

09D5 

2B 

DCX 

H 

09D6 

7E 

MOV 

A,  M 

09  D7 

3C 

INR 

A 

GET  IS  HALF  OF  WS 
STORE  LS  MANTISSA  BYTE 
STOEE  UNDERFLOW  BYTE 
EESTOEE  STACK 
GET  POINTER  ADDEESS 

LEADING  ZERO  SUPPEESSION 


SAVE  DEC  DIG 

LOAD  COUNTED 

TEST  FOR  1ST  DIGIT 

SKIP  IF  NOT  1ST  DIG 

ELSE  CONTINUE 

EESTOEE  DEC  DIG,  STACK 

TEST 

SKIP  IF  NON  ZEEO  DIG 
ELSE  CONT 

LOAD  DECIMAL  EXPONENT 
DECEEMENT  DEC  EXP 
EESTOEE  EXP  ON  STACK 
SHIFT  OUT  OTHEE  1ST  DIG 
EELOAD  DEC  DIGIT 
CONTINUE 

DECEEMENT  COUNTER 
SKIP  STOEE  IF  ZERO 

STOEE  OVERFLOW  AS  DEC  DIGIT 


STOEE  DECIMAL  DIGIT 
REPEAT  LOOP  FOR  NEXT  DIGIT 
TEST  FOE  ROUNDUP 


SKIP  IF  LAST  DIGIT  LT  5 
ELSE  DO 

ROUNDUP 


POINT  TO  LS  DIGIT 
LOAD 

INCREMENT 

STOEE 

MASK  FOE  CY 
ROUNDUP  COMPLETED 
ELSE  A  CY  WAS  DETECTED 
EELOAD  LS  DIGIT 
MASK  OFF  CY 

SET  POINTER  TO  NEXT  DIGIT 
LOAD  3RD  DIGIT 
INCREMENT 
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0SD8 

27 

DAA 

09  D9 

77 

MOV  M  ,  A 

STORE 

09DA 

E6F0 

ANI  OF  OH 

MASK  FOR  CY 

09  DC 

CA070A 

JZ  BTD14 

ROUNDUP  COMPLETED,  ELSE 
ANOTHER  CY  DETECTED 

09DF 

7E 

MOV  A  ,  M 

09E0 

E60F 

ANI  OF H 

MASK  CY  OFF  3RD  DIGIT 

09E2 

77 

MOV  M,A 

09E3 

2B 

DCX  H 

09E4 

7E 

MOV  A,M 

LOAD  2ND  DIGIT 

09E5 

3C 

INR  A 

09E6 

27 

DAA 

09E7 

77 

MOV  M,A 

09E8 

E6F0 

ANI  OF  OH 

09EA 

CA070A 

JZ  BTD14 

DONE,  ELSE  OTHER  CY 

09ED 

7E 

MOV  A  ,  M 

09EE 

E60F 

ANI  OFH 

MASK  CY  OFF  2ND  DIGIT 

09F0 

77 

MOV  M ,  A 

09F1 

2B 

DCX  H 

09F2 

7E 

MOV  A ,  M 

09F3 

3C 

INR  A 

09F4 

27 

DAA 

09F5 

77 

MOV  M  ,  A 

09F6 

E6F0 

ANI  OFOH 

09F8 

C A  070 A 

JZ  BTD14 

ROUNDUP  HOPEFULY  COMPLETED 
ELSE  CY  OUT  OF  MS  DIGIT 

LOAD  1.000  AND  INC  EXPONENT 

09FB 

3601 

M  VI 

M  ,  0 1 H 

09  FD 

AF 

XRA 

A 

09FE 

23 

I  NX 

H 

09FF 

77 

MOV 

M,  A 

OA  00 

23 

INX 

H 

0A0 1 

77 

MOV 

M,  A 

0AO2 

23 

INX 

H 

0A03 

77 

MOV 

M,  A 

OA  04 

D 1 

POP 

D 

0A05 

1C 

INR 

E 

0A06 

D5 

PUSH 

;  d 

0A07 

D 1 

BTD14: POP 

D 

OA  08 

212E20 

LXI 

H , DEC V6 

OAOB 

AF 

XRA 

A 

OA  OC 

57 

MOV 

D,  A 

OAOD 

7B 

MOV 

A  ,  E 

OAOE 

3D 

DCR 

A 

OAOF 

5F 

MOV  E, A 

0  A 10 

A7 

ANA  A 

OA  1 1 

F2 1 80 A 

JP  BTD 1 

LOAD  1  TO  MS  DIGIT 
CLEAR  A 

CLEAR  2ND  DIGIT 

CLEAR  3RD  DIGIT 

CLEAR  LS  DIGIT 

LOAD  DECIMAL  EXPONENT 

INCREMENT 

REPLACE  ON  STACK 

CONVERT ,  UNPACK  AND  STORE  EXP 


LOAD  DECIMAL  EXPONENT 
POINT  AT  EXPONENT  SIGN 
CLEAR  A 

CLEAR  EXPONENT  SIGN  FLAG 

LOAD  EXPONENT 

DECREMENT  EXP  TO  PLACE 

DECIMAL  POINT  AFTEF 

LEADING  DIGIT 

STORE 

TEST 

SKIP  IF  SIGN  ♦,  ELSE 


* 
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0A14 

2F 

CM  A 

OA  15 

3C 

INR  A 

0A16 

5F 

MOV  E , A 

OA  17 

15 

DCR  D 

OA  1 8 

72 

BTD 15: MOV  M , D 

OA  19 

23 

INX  H 

OA  1  A 

0608 

M VI  B, 08H 

OA  1C 

AF 

XR A  A 

OA  1 D 

4F 

MOV  C ,  A 

OA  1 E 

57 

MOV  D , A 

OA  IF 

7B 

BTD 1 6 : MO V  A, E 

0A20 

07 

RLC 

0A21 

5F 

MOV  E, A 

0A22 

79 

MOV  A , C 

0A23 

8  A 

ADC  D 

0A24 

27 

DA  A 

0A25 

DA350A 

JC  BTD 1 7 

0A28 

05 

DCR  B 

0A29 

CA3D0A 

JZ  BTD 1 8 

0A2C 

87 

ADD  A 

0A2D 

27 

DAA 

0A2E 

DA350A 

JC  BTD 1 7 

0A31 

4F 

MOV  C , A 

OA  32 

C  3  1 1  0  A 

JMP  BTD 1 6 

0A35 

F5 

BTD 1 7: PUSH  PSW 

0A36 

E5 

PUSH  H 

0A37 

216660 

L XI  H , 6066H 

0A3A 

C34000 

JMP  ERRFA 

0A3D 

4F 

BTD 1 8 : MO V  C , A 

0A3E 

E6F0 

ANI  OF  OH 

0A40 

OF 

RPC 

OA  4 1 

OF 

RRC 

0A42 

OF 

RRC 

0A43 

OF 

RRC 

OA  44 

77 

MOV  M , A 

OA  45 

23 

INX  H 

0A46 

79 

MOV  A , C 

0A47 

E6  OF 

ANI  OFH 

0A49 

77 

MOV  M , A 

0A4A 

El 

BTDOE: POP  H 

0A4B 

D  1 

POP  D 

CA4C 

Cl 

POP  B 

0A4D 

FI 

POP  PSW 

0A4E 

C9 

RET 

COMPLEMENT  EXP,  SIGN  FLAG 
COMPLEMENT  EXPONENT 
INCREMENT 
STORE 

SET  EXP  SIGN  FLAG  TO 
FFH  FOR  -  SIGN 
STORE  EXP  SIGN  FLAG 

CONVERT  EXPONENT 
LOAD  COUNTER 
CLEAR  A 

STORE  BCD  DEC  EXP 
CLEAR  D 

LOAD  DEC  EXP  IN  BINARY 
SHIFT  IN  NEXT  BIT 
STORE  BINARY  EXP 
LOAD  DEC  EXP 
ADD  NEXT  BIT 
DECIMAL  ADJUST 
OVERFLOW  ERROR  EXIT 
DEC  COUNTER 
DONE  IF  ZERO 
MULT  DEC  EXP  BY  2 

OVERFLOW  ERROR  EXIT 
STORE  DEC  EXP 
REPEAT  LOOP 


LOAD  ERROR  CODE  14 
ERROR  EXIT 
SAVE  EEC  EXP 
MASK  FOR  MS  DIGIT 
SHIFT  RIGHT  4  BITS 


STORE 


MASK  FOR  LS  DIGIT 
STORE 

RESTORE  INTERNAL  REGISTERS 


DONE 


. 
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D.  Calculator  Function  Routines 


Forwarding  Addresses 


ocoo 

C32A0C 

CENTF 

JMP 

CENTS 

0C03 

C30F0D 

CCGSF 

JMP 

CCGSS 

0C06 

C3220D 

CHEXF 

JMP 

CHEXS 

OC  09 

C3500D 

CSX  YF 

JMP 

CSX  YS 

ococ 

C3820D 

CMULF 

JMP 

CMULS 

OCOF 

C3920D 

CDIVF 

JMP 

CDIVS 

OC  12 

C3A20L 

CADDF 

JMP 

CADDS 

OC  15 

C3B20D 

CSUBF 

JMP 

CS  UBS 

OC  1 8 

C3F50D 

CSTRF 

JMP 

CSTRS 

OC  IB 

C32D0E 

CRCLF 

JMP 

CRCLS 

OC  IE 

C3490C 

DENFA 

JMP 

DENST 

0C21 

C3B00C 

DDSFA 

JMP 

DDSST 

0C24 

C3860E 

FPDSF 

JMP 

FPDSS 

0C27 

C3A50E 

FPDRF 

JMP 

FPDRS 

The  Y  Register 

Load  Function 

0C2A 

CD 86 OE  CENTS: CALL 

FPDSS 

0C2D 

AF 

XRA 

A 

0C2E 

320E20 

STA 

FTNFL 

0C31 

CD  490C 

CALL 

DENST 

0C34 

CD0008 

CALL 

DTBFA 

0C37 

01  1F20 

LXI 

B , FP V21 

0C3A 

113420 

L  XI 

D , YREG1 

0C3D 

2603 

MVI 

H  ,  03H 

0C3F 

CD4F00 

CALL 

BKMFA 

0C42 

CDBOOC 

CALL 

DDSST 

0C45 

CDA50E 

CALL 

FPDRS 

0C48 

C9 

RET 

LOAD  Y  REG 

CHANGE  SIGN 

DECIMAL  TO  HEX 

SWAP  X  AND  Y 

MULTIPLY 

DIVIDE 

ADD 

SUBTRACT 

STORE 

RECALL 

DECIMAL  ENTER 
DECIMAL  DISPLAY 
F.P.  WORKSPACE  PUSH 
F.P.  WORKSPACE  POP 


PUSH  FLOATING  POINT  WORKSPACE 

CLEAR  FTN  FLAG 
MOVE  DATA  FROM  DISP 
FILE  TO  DEC VN 
CONVERT  TO  BINARY 
STORE  IN  FPV2N 


MOVE  ENTERED  DATA  TO  YREG 

DISP  ENTERED  DATA 

POP  FLOATING  POINT  WORKSPACE 


.  , 
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The  Decimal  Data  Entry  Routine 


0C49 

F5 

DENST:PUSH  PSW 

0C4A 

C5 

PUSH  E 

0C4B 

D5 

PUSH  D 

0C4C 

E5 

PUSH  H 

0C4D 

212920 

L XI  H , DECV1 

0C50 

0608 

M VI  B , 08H 

0C52 

AF 

XRA  A 

0C53 

77 

DEN0 1 : MOV  M , A 

0C54 

23 

INX  H 

0C55 

05 

DCR  B 

0C56 

C2530C 

JNZ  DEN01 

0C59 

211820 

L XI  H , DDAT7 

0C5C 

112920 

LXI  D , DEC VI 

0C5F 

0E04 

M VI  C , 04 H 

0C6  1 

7E 

MOV  A , M 

0C62 

E6F0 

ANI  OF  OH 

0C64 

CA6C0C 

JZ  DEN 02 

0C67 

7E 

MOV  A , M 

0C68 

12 

STAX  D 

0C69 

C3700C 

JMP  DEN03 

0C6C 

7E 

DENO 2: MOV  A, M 

0C6D 

13 

INX  D 

0C6E 

12 

STAX  D 

0C6F 

0D 

DCR  C 

0C70 

13 

DEN03: INX  D 

0C7 1 

2B 

DCX  H 

0C72 

7E 

DEN04: MOV 

A,  M 

0C73 

E6F0 

ANI 

OF  OH 

0C75 

C2A00C 

JNZ 

DEN06 

0C78 

7E 

MOV 

A  ,  M 

0C79 

EEOE 

XRI 

OEH 

0C7B 

CA9A0C 

JZ  DEN05 

0C7E 

7E 

MOV 

A  ,  M 

0C7F 

12 

STAX 

:  D 

0C80 

2B 

DCX 

H 

0C81 

13 

INX 

D 

OC  82 

OD 

DCR 

C 

OC  83 

C2720C 

JNZ 

DEN04 

OC  86 

7E 

MOV 

A  ,  M 

SAVE  INT  REGISTERS 


POINT  TO  DECVN 

CLEAR  A 
CLEAR  DECVN 


REPEAT  UNTIL  DONE 
POINT  TO  DISPLAY  FILE 
POINT  TO  DEC  DATA  FILE 
LOAD  DIGIT  COUNTER 
LOAD  1ST  DIGIT  OR  SIGN 
TEST  FOR  SIGN 
WAS  DIGIT  IF  ZERO,  ELSE 
STORE  -  SIGN  FLAG 
RELOAD  SIGN  FLAG 
STORE  IN  DEC  DATA  FILE 
GO  TO  NEXT  STEP 
RELOAD  DIGIT 
POINT  TO  1ST  DIGIT 
STORE  DIGIT 

DECREMENT  DIGIT  COUNTER 
POINT  TO  NEXT  DEC  DIGIT 
POINT  TO  NEXT  INPUT  LOCN 

LOAD  DIGITS 


LOAD  NEXT  CHARACTER 

TEST  FOR  -  SIGN 

WAS  -  SIGN,  ELSE 

RELOAD  AND 

TEST  FOR  EXP  CODE 

WAS  EXP  CODE 

RELOAD  AND 

STORE  NEXT  DIGIT 

POINT  TO  NEXT  INPUT 

POINT  TO  NEXT  OUTPUT 

DECREMENT  COUNTER 

REPEAT  UNTIL  4  DIGITS  LOADED 

LOAD  EXP  SIGN  OR  VALUE 


LOAD  A  SIGN  FLAG 
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OR  AN  EXPONENT 


OC  87 

E6F0 

ANI 

OFOH 

TEST  FOR  -  SIGN 

0C89 

C2A00C 

JNZ 

DEN06 

WAS  -  SIGN 

ccec 

7E 

MOV 

A,  M 

RELOAD 

CC8D 

EEOE 

XRI 

OEH 

TEST  FOR  EXP  CODE 

0C8F 

CA9A0C 

JZ  DEN05 

WAS  EXP  CODE,  ELSE 

IT  WAS  EXPONENT 

OC  92 

7E 

MOV 

A,  M 

RELOAD  EXPONENT 

OC  93 

113020 

LXI 

D , DEC V8 

POINT  TO  LS  EXP  DIGIT 

OC  96 

12 

STAX 

D 

STORE  EXPONENT 

OC  97 

C3AB0C 

JMP 

DEN08 

GO  TO  END 

STORE  -  EXP  FLAG 
ADDRESSED  CHAR  IS  EXP  SIGN 


0C9A 

112E20 

DEN  05: LXI 

D , DEC V6 

POI  NT 

TO 

EXP  SIGN 

0C9D 

C3 A50C 

JMP 

DEN07 

OCAO 

112E20 

DENO  6 : LXI 

D, DECV6 

POINT 

TO 

EXP  SIGN 

OC  A3 

3EFF 

M  VI 

A , OFFH 

LOAD  - 

■  SIGN  FLAG 

0CA5 

12 

DEN07: STAX 

:  D 

STORE 

SIGN  FLAG 

0CA6 

13 

INX 

D 

POINT 

TO 

LS  EXP  DIG 

0CA7 

13 

INX 

D 

0CA8 

2B 

DCX 

H 

POINT 

TO 

EXPONENT 

OCA  9 

7E 

MOV 

A  ,  M 

OCA  A 

12 

STAX 

:  d 

STORE 

IN 

DECV8 

OCAB 

El 

DEN  0  8: POP 

H 

OCAC 

D 1 

POP 

D 

OCAD 

Cl 

POP 

B 

OCAE 

FI 

POP 

PSW 

OCAF 

C9 

RET 

The  Decimal 

Data  Display  Routine 

CCBO 

F5 

DDS ST : PUSH  PSW 

0CB1 

C5 

PUSH  B 

0CB2 

D5 

PUSH  D 

0CB3 

E5 

PUSH  H 

0CB4 

3EFF 

MVI  A, OFFH 

0CB6 

323720 

STA  CLRFL 

SET  CLEAR  FLAG 

0CB9 

213020 

LXI  H , DEC V8 

OC  BC 

3E90 

MVI  A , 90H 

AUTO  INC 

WRITE  DISP 

OCBE 

D305 

OUT  C 8279 

occo 

7E 

MOV  A , M 

LOAD  LS 

EXP  DIG 

0CC1 

2B 

DCX  H 

0CC2 

CD4C00 

CALL  CVSFA 

CONVERT 

0CC5 

D304 

OUT  D8279 

OUTPUT 

0CC7 

7  E 

MOV  A , M 

LOAD  MS 

EXP  DIG 

0CC8 

A7 

ANA  A 

TEST 

0CC9 

CAD40C 

JZ  DDS  0 1 

SKIP  IF 

ZERO,  ELSE 

. 
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occc 

F5 

PUSH  PSW 

DISPLAY  ERROR 

OCCD 

E5 

PUSH  H 

OCCE 

21D660 

L XI  H,60D6H 

LOAD 

ERROR  CODE,  15 

OCD1 

C34000 

JMP  ERRFA 

OCD4 

2B 

DDSO  1 : DCX  H 

POINT 

TO  SIGN  BYTE 

0CD5 

7E 

MOV  A,M 

LOAD 

AND  TEST 

0CD6 

A7 

ANA  A 

0CD7 

CADCOC 

JZ  DDS02 

SKIP 

IF  ZERO,  ELSE 

OC  DA 

3E04 

M VI  A,04H 

LOAD 

-  SIGN  CODE 

OCDC 

D304 

DDS02: OUT  D8279 

OUT  TO  DISP  RAM 

OCDE 

3E97 

MVI  A,97H 

LOAD 

AND  WRITE  E 

OCEO 

D304 

OUT  D 8279 

0CE2 

2B 

DCX  H 

POINT 

1  TO  LS  MANT  BYTE 

0CE3 

7E 

MOV  A,M 

LOAD 

LS  MANT  DIG 

0CE4 

2B 

DCX  H 

0CE5 

CD4C00 

CALL  CVSFA 

OCE8 

D304 

OUT  D8279 

OCEA 

7E 

MOV  A ,  M 

LOAD 

3RD  MANT  DIG 

OCEB 

2B 

DCX  H 

OCEC 

CD4C00 

CALL  CVSFA 

CCEF 

D304 

OUT  D8279 

OCF1 

7E 

MOV  A,M 

LOAD 

2ND  MANT  DIG 

0CF2 

2B 

DCX  H 

0CF3 

CD4C00 

CALL  CVSFA 

0CF6 

D304 

OUT  D8279 

0CF8 

7E 

MOV  A,M 

LOAD 

MS  MANT  DIG 

0CF9 

CD4C00 

CALL  CVSFA 

OCFC 

C608 

ADI  08H 

ADD  DECIMAL  POINT 

OCFE 

D304 

OUT  D8279 

ODOO 

2B 

DCX  H 

ODOI 

7E 

MOV  A,M 

LOAD 

SIGN  BYTE 

0D02 

A7 

ANA  A 

OD  03 

CA080D 

JZ  DDS03 

SKIP 

IF  POSITIVE,  ELSE 

0D06 

3E04 

MVI  A,04H 

LOAD 

AND  DISP  -  SIGN 

0D08 

D304 

DDSO 3 : OUT  D8279 

DISP 

SIGN  OR  ELANK 

ODOA 

El 

POP  H 

ODOB 

D 1 

POP  D 

ODOC 

Cl 

POP  B 

ODOD 

FI 

POP  PSW 

ODOE 

C9 

RET 

. 
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The  ^icjn  Change  Function 


ODOF 

F5 

CCGSS: PUSH  PSW 

SAVE  INTERNAL  REGISTERS 

0D10 

C5 

PUSH  B 

OD  1 1 

D5 

PUSH  D 

0D12 

E5 

PUSH  H 

OD  1 3 

AF 

XR  A  A 

OD  14 

320E20 

ST'A  FTNFL 

CLEAR  FTN  FLAG 

OD  1 7 

01 04FF 

LXI  B , 0FF04H 

LOAD  SIGN  FLAG 

AND  SEVEN  SEG  CODE 

OD  1  A 

CD5200 

CALL  DSPFA 

OD  ID 

El 

POP  H 

RESTORE  INTERNAL  REGISTERS 

OD  IE 

D 1 

POP  D 

OD  1 F 

Cl 

POP  B 

0D20 

FI 

POP  PSW 

0D21 

C9 

RET 

DONE 

The  Decimal  to  Hexadecimal  Conversion  Function 


0D22 

F5 

CHEX S: PU SH  PSW 

0D23 

C5 

PUSH  B 

0D24 

E5 

PUSH  H 

0D25 

3EFF 

MVI  A , OFFH 

0D27 

323720 

STA  CLRFL 

0D2A 

CD  49  00 

CALL  CLRFA 

0D2D 

0E03 

MVI  C  ,  03  H 

0D2F 

213620 

LXI  H , YREG3 

0D32 

3E90 

MVI  A,90H 

0D34 

D305 

OUT  C8279 

0D36 

46 

CFHX  1 : MOV  B,M 

0D37 

78 

MOV  A,B 

0D38 

2B 

DCX  H 

0D39 

CD4C00 

CALL  CVSFA 

0D3C 

D304 

OUT  D 8279 

0D3E 

78 

MOV  A ,  B 

0D3F 

OF 

RRC 

0D40 

OF 

RRC 

0D41 

OF 

RRC 

0D42 

OF 

RRC 

OD  43 

CD4C00 

CALL  CVSFA 

0D46 

D304 

OUT  D 8279 

0D48 

OD 

DCR  C 

OD  49 

C2360D 

JNZ  CFHX 1 

0D4C 

El 

POP  H 

0D4D 

Cl 

POP  B 

0D4E 

FI 

POP  PSW 

0D4F 

C9 

RET 

SAVE  INT  REGISTERS 


SET  CLEAR  FLAG 

CLEAR  DISP  AND  RAM 
LOAD  COUNTER 
POINT  TO  EXP  OF  DATA 
SELECT  DISP  LOCN  0 
WITH  AUTO  INC  ON 
LOAD  DATA 


MASK  AND  CONVERT  TO 
7  SEG  CODE 
WRITE  TO  DISP 

SHIFT  RIGHT  TO  GET  MS  NIBBLE 


MASK  AND  CONVERT 

DECREMENT  COUNTER 
REPEAT  IF  NOT  DONE 


DONE 


' 
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The  : 

X  and  Y 

Reqister  Exchanqe 

Function 

0D50 

CD860E 

CSX YS : CALL  FPDSS 

SAVE  F. P.  SCRATCHPAD 

0D53 

AF 

XRA  A 

CLEAR  A 

0D54 

320E20 

STA  FTNFL 

CLEAR  FTN  FLAG 

0D57 

013420 

L XI  B , YREG 1 

POINT  TO  Y  REG 

0D5A 

11 1F20 

L XI  D,FPV21 

POINT  TO  FPV2N 

0D5D 

2603 

M VI  H ,  03H 

LOAD  BYTE  COUNT 

0D5F 

CD4F00 

CALL  BKMFA 

MOVE  YREGN  TO 

FPV2N 

0D62 

013120 

LXI  B , XREG1 

0D65 

113420 

LXI  D  r  YREG1 

0D68 

2603 

MVI  H, 03H 

0D6A 

CD4F00 

CALL  BKMFA 

MOVE  XREGN  TO 

YREGN 

0D6D 

01 1F20 

LXI  B  t FP V2 1 

0D70 

113120 

LXI  D,XREG1 

0D73 

2603 

MVI  H#  03H 

OD  75 

CD4F00 

CALL  BKMFA 

MOVE  FPV2N  TO 

X  REG 

0D78 

CD0308 

CALL  BTDFA 

CONVERT  FPV2N 

TO  DECIMAL 

0D7B 

CDBOOC 

CALL  DDSST 

DISPLAY 

0D7E 

CDA50E 

CALL  FPDRS 

RESTORE  F.P.  SCRATCHPAD 

0D8 1 

C9 

RET 

DONE 

The 

Multiplication 

i  Function 

OD  82 

CD860E  CMULS: 

CALL 

FPDSS 

STORE  INT  REGS 

0D85 

CDC20D 

CALL 

CFSTS 

ENTER  DATA 

OD  88 

CD  000  4 

CALL 

MULFA 

MULTIPLY 

0D8B 

CDE30D 

CALL 

CFENS 

STORE  AND  DISPLAY  RESULT 

0D8E 

CDA50E 

CALL 

FPDRS 

RESTORE  INT  REGISTERS 

0D9 1 

C9 

RET 

.  . 
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The  Division  Function 


0D92 

CD860E 

CDI VS: CALL 

FPDSS 

0D95 

CDC20D 

CALL 

CFSTS 

0D98 

CD0304 

CALL 

DIVFA 

0D9B 

CDE30D 

CALL 

CFENS 

0D9E 

CDA50E 

CALL 

FPDRS 

0DA1 

C9 

RET 

The 

Addition 

Function 

0DA2 

CD860E 

CADDSlCALL 

FPDSS 

0DA5 

CDC20D 

CALL 

CFSTS 

0DA8 

CD  0604 

CALL 

ADDFA 

ODAB 

CDE30D 

CALL 

CFENS 

ODAE 

CDA50E 

CALL 

FPDRS 

0DB1 

C9 

RET 

DIVIDE 


ADD 


The  Subtraction  Function 


0DB2 
0DB5 
0DB8 
ODBB 
ODBE 
ODC 1 


CD860E 

CDC20D 

CD0904 

CDE30D 

CDA50E 

C9 


CSUBS: CALL 
CALL 
CALL 
CALL 
CALL 
RET 


FPDSS 

CFSTS 

SUBFA 

CFENS 

FPDRS 


SUBTRACT 
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The  Calculator  Function  Start  Routine 


0DC2 

AF 

CFSTS: XEA  A 

CLEAR  A 

0DC3 

320E20 

STA  FTNFL 

CLEAR  FTN  FLAG 

0DC6 

CD490C 

CALI  DENST 

0DC9 

CD0008 

CALL  DTBFA 

ODCC 

01 1F20 

LXI  B,FPV21 

ODCF 

113120 

L XI  D,XREG1 

0DD2 

2603 

M  VI  H,03H 

0DD4 

CD4F00 

CALL  BKMFA 

MOVE  NEW  DATA  TO  X  REG 

0DD7 

013420 

LXI  B , YREG1 

ODDA 

11 1C20 

LXI  D , FP V  1 1 

ODDD 

2603 

M  VI  H , 03H 

ODDF 

CD4F00 

CALL  BKMFA 

MOVE  Y  REG  TO  FPV1N 

0DE2 

C9 

RET 

The  i 

Calculator 

Function  End  Routine 

0DE3 

011F20  CFENS: LXI  B,FPV21 

LOAD  BLOCKMOVE 

DATA 

0DE6 

113420 

LXI  D , YREG 1 

0DE9 

2603 

M VI  H,03H 

ODEB 

CD4F00 

CALL  BKMFA 

MOVE  RESULT  TO 

YEEGN 

ODEE 

CD0308 

CALL  BTDFA 

CONVERT  RESULT 

TO  DECIMAL 

0DF1 

CDBOOC 

CALL  DDSST 

DISPLAY  RESULT 

0DF4 

C9 

RET 

The  Data  Store  Function 


0DF5 

F5 

CSTR S: PUSH  PSW 

SAVE  INT  REGISTERS 

0DF6 

C5 

PUSH  B 

0DF7 

D5 

PUSH  D 

0DF8 

E5 

PUSH  H 

0DF9 

AF 

XR A  A 

CLEAR  A 

ODI  A 

320E20 

STA  FTNFL 

CLEAR  FTN  FLAG 

ODFD 

3 A  1 820 

LD A  DDAT7 

LOAD  MEMORY  ADDRESS 

0E00 

47 

MOV  B,A 

STORE 

OE  0 1 

D60A 

SUI  OAH 

CHECK  FOR  OUT  OF 

RANGE  ADDRESS 

0E03 

FAOEOE 

JM  CSTR1 

SKIP  IF  ADDRESS  LT  9, 
ELSE  ERROR  EXIT 

0E06 

F5 

PUSH  PSW 

0EO7 

E5 

PUSH  H 

0EC8 

216060 

LXI  H  #  606  OH 

LOAD  ERROR  CODE  11 
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0E0B 

C34000 

JMP 

ERRFA 

CEOE 

78 

CSTR 1 : MOV 

A  ,  B 

OEOF 

07 

RLC 

0E10 

80 

ADD 

B 

0E1 1 

5F 

MOV 

E,  A 

0E12 

AF 

XR  A 

A 

OE  13 

57 

MOV 

D,  A 

OE  14 

213420 

L  XI 

H , YREG1 

OE  1 7 

46 

MOV 

B,  M 

OE  1 8 

23 

INX 

H 

OE  1 9 

4E 

MOV 

C  ,  M 

OE  1 A 

23 

INX 

H 

OE  1 B 

7E 

MOV 

A,  M 

OE  1C 

213820 

LXI 

H, MEMOO 

OE  IF 

19 

DAD 

D 

OE  20 

70 

MOV 

M  ,  B 

OE  2 1 

23 

INX 

H 

0E22 

71 

MOV 

M  ,  C 

OE  23 

23 

INX 

H 

0E24 

77 

MOV 

M,  A 

0E25 

CD4900 

CALL  CLF.FA 

0E28 

El 

POP 

H 

0E29 

D 1 

POP 

D 

0E2A 

Cl 

POP 

B 

0E2B 

FI 

POP 

PSW 

0E2C 

C9 

RET 

LOAD  ADDRESS 
SHIFT  TO  MULT  BY  2 
ADD  TO  MULT  BY  3 
STORE  OFFSET 
CLEAR  A 
CLEAR  D 

POINT  TO  Y  REG 
LOAD  MS  DATA  BYTE 

LOAD  LS  BYTE 

LOAD  EXP 

LOAD  START  OF  MEMORY  FILE 
ADD  OFFSET 
STORE  MS  BYTE 

STORE  LS  BYTE 

STORE  EXP 

CLEAR  DISPLAY,  DISPLAY  FILE 
RESTORE  INT  REGISTERS 


The  Data  Recall  Function 


0E2D 

CD860E 

CRCLS: CALI 

,  FPDSS 

0E30 

AF 

XR  A 

A 

OE  3 1 

320E20 

STA 

FTNFL 

0E34 

3 A  1820 

LDA 

DDAT7 

0E37 

47 

MOV 

B,  A 

0E38 

D60A 

SUI 

OAH 

0E3A 

FA450E 

JM  CRCL1 

0E3D 

F5 

PUSH 

;  PSW 

0E3E 

E5 

PUSH 

:  H 

0E3F 

21B560 

LXI 

H , 6  0B5H 

0E42 

C34000 

JMP 

ERRFA 

0E45 

78 

CRCL 1 : MOV 

A ,  B 

OE  46 

07 

RLC 

OE  47 

80 

ADD 

B 

0E48 

5F 

MOV 

E,  A 

0E49 

AF 

XRA 

A 

OE  4  A 

57 

MOV 

D,  A 

0E4B 

213820 

LXI 

H , MEMOO 

0E4E 

19 

DAD 

D 

PUSH  F.P.  SCRATCHPAD 
CLEAR  A 

CLEAR  FTN  FLAG 
LOAD  MEMORY  ADDRESS 
STORE 

CHECK  FOR  OUT  OF 
RANGE  ADDRESS 

SKIP  IF  IN  RANGE,  ELSE  ERROR 
ERROR  EXIT 

LOAD  ERROR  CODE  12 

LOAD  ADDRESS 
SHIFT  TO  MULT  BY  2 
ADD  TO  MULT  BY  3 
STORE  OFFSET 
CLEAR  A 
CLEAR  D 

LOAD  START  OF  MEM  FILE 
ADD  OFFSET 


. 
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0E4F 

44 

MOV  B,H 

LOAD  BLCCKMOVE  DATA 

0E50 

4D 

MOV  C  ,  L 

0E51 

111F20 

LXI  D,FPV21 

0E  54 

2603 

M VI  H, 03H 

0E56 

CD4F00 

CALL  BKMFA 

MOVE  DATA  TO  FPV2N 

0E59 

CD0308 

CALL  BTDFA 

CONVERT 

0E5C 

CDB00C 

CALL  DDSST 

DISPLAY 

STORE  DATA  IN  DDATN 

0E5F 

212920 

LXI  H , DECV1 

SOURCE  FILE 

0E62 

111820 

LXI  D , DD AT7 

DESTINATION  FILE 

0E65 

7E 

MOV  A,M 

LOAD  MAN!  SIGN 

0E66 

23 

IN  X  H 

POINT  TO  MS  MANT  DIGIT 

0E  67 

A7 

ANA  A 

TEST  SIGN 

0E68 

CA6D0E 

JZ  CRCL2 

SKIP  IF  ZERO,  ELSE 

0E6B 

12 

STAX  D 

STORE 

CE6C 

IB 

DCX  D 

NEXT  DEST  FILE  LOCN 

0E6D 

0604 

CRCL 2: M VI  B/04H 

LOAD  DIGIT  COUNTER,  4D 

0E6F 

7E 

CRCL 3: MOV  A,M 

LOAD  DIGIT 

0E7O 

12 

STAX  D 

STORE 

0E7 1 

23 

IN X  H 

UPDATE  POINTERS 

OE  72 

IB 

DCX  D 

0E73 

05 

DCR  B 

DECREMENT  COUNTER 

0E74 

C26F0E 

JNZ  CRCL3 

REPEAT 

0E77 

7E 

MOV  A,M 

LOAD  EXP  SIGN 

0E78 

23 

INX  H 

POINT  TO  LS  EXP  DIG 

0E79 

23 

INX  H 

0E7A 

A7 

ANA  A 

TEST  SIGN 

0E7B 

CA800E 

JZ  CRCL4 

SKIP  IF  POS,  ELSE 

0E7E 

12 

STAX  D 

STORE  EXP  SIGN 

0E7F 

IB 

DCX  D 

UPDATE  POINTER 

0E80 

7E 

CRCL 4 : MOV  A,M 

LOAD  EXPONENT  DIGIT 

0E81 

12 

STAX  D 

STORE 

0E82 

CDA50E 

CALL  FPDRS 

POP  F.P.  SCRATCHPAD 

0E85 

C9 

RET 

The  Floating  Point  Workspace  Save  Routine 


0E86 

F3 

FPDSS: DI 

DISABLE  INT ERRRUPTS 

0E87 

E3 

XTHL 

LOAD 

RETURN  ADD,  PUSH 

0E88 

D5 

PUSH  D 

0E89 

C5 

PUSH  B 

0E8A 

F5 

PUSH  PSW 

0E8B 

225620 

SHLD  FPDTS 

SAVE 

RET  ADDRESS 

0E8E 

AF 

XR A  A 

CLEAR 

A,  H,L 

0E8F 

67 

MOV  H , A 

0E90 

6F 

MOV  L, A 

OE  91 

39 

DAD  SP 

LOAD 

STACK  POINTER 

0E92 

11 1C20 

LXI  D , FP V 1 1 

DATA 

START  ADDRESS 

0E95 

06  OD 

M VI  B , ODH 

NO  CF 

DATA  BYTES 

• 

• 

' 
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0ES7 

2B 

FPDS1:DCX  H 

0FS8 

1 A 

LDAX  D 

0E99 

77 

MOV  M  ,  A 

0E9A 

13 

INX  D 

0E9B 

05 

DCR  B 

0F9C 

C2970E 

JNZ  FPDS1 

0E9F 

F9 

SPHL 

OE  AO 

2A5620 

LHLD  FPDTS 

OE  A3 

FB 

El 

0EA4 

E9 

PCHL 

The  Floatinq 

Point  Workspace 

0EA5 

F  3 

FPDRS : DI 

0EA6 

El 

POP  H 

0EA7 

225620 

SHLD  FPDTS 

OE  AA 

AF 

XRA  A 

OEAB 

67 

MOV  H , A 

OE  AC 

6  F 

MOV  L, A 

OEAD 

39 

DAD  SP 

OEAE 

112820 

LXI  D , FPLCT 

OEB 1 

06  OD 

M VI  B,0DH 

0EB3 

7E 

FPDR  1  : MOV  A , M 

0EB4 

23 

INX  H 

0EB5 

12 

STAX  D 

0EE6 

IB 

DCX  D 

0EB7 

05 

DCR  B 

CEB8 

C2B30E 

JNZ  FPDR1 

OEBB 

F9 

SPHL 

OEBC 

2A5620 

LHLD  FPDTS 

OEBF 

FI 

POP  PSW 

OECO 

Cl 

POP  B 

0EC1 

D 1 

POP  D 

0EC2 

E3 

XIHL 

0EC3 

FB 

El 

0EC4 

C9 

RET 

SET  SP  TO  NEXT  FREE  LOCN 
LOAD  DATA 
STORE  ON  STACK 
NEXT  DATA  LOCN 
DECREMENT  COUNTER 
REPEAT  LOOP 

LOAD  NEW  STACK  POINTER 
RELOAD  RET  ADD 
REENABLE  INTERRUPTS 
RETURN 


re  Routine 


DISABLE  INTERUPTS 
LOAD  RETURN  ADDRESS 
SAVE  RETURN  ADD 
CLEAR  A,H,L 


LOAD  SP 

LAST  DATA  ADDRESS 
NO  OF  DATA  BYTES 
LOAD  DATA  FROM  STACK 
INC  SP 
STORE  DATA 
NEXT  DATA  LOCATION 
DECREMENT  COUNTER 
REPEAT  LOOP 

LOAD  NEW  STACK  POINTER 
RELOAD  RET  ADD 


POP  HL,  STORE  RET  ADD 
REENABLE  INTERRUPTS 
RETURN 


' 

205 


E.  Application  Module  Software 


Forwarding  Addresses 


1000 

C30C10 

MINFA: JMP  MINST 

MOTOR  CONT  INIT 

1003 

C36010 

MSTF A: JMP  MSTST 

MOTOR  START 

1006 

C3CC10 

CUPF A: JMP  CUPST 

MOTOR  CONTROL  UPDATE 

1009 

C30A13 

MSTPF: JMP  MSTPS 

STOP  MOTOR 

The  Application  Module  Initialization  Routine 

10  0C 

F5 

MINST : PUSH  PSW 

SAVE  INT  REGISTERS 

100D 

C5 

PUSH  B 

100E 

D5 

PUSH  D 

10  OF 

E5 

PUSH  H 

1010 

AF 

XRA  A 

CLEAR  A ,  RUN  FLAG 

1011 

326220 

STA  RUNFL 

INIT  SCR  FIRING  TIMER 

1014 

3E32 

M VI  A,32H 

SELECT  MODE  1 ,  BINARY 

1016 

D3FF 

OUT  TIM  1 C 

WRITE  TO  TIMER  0 

NO  FIRING  PULSES  ARE  OUTPUT 


LOAD  SET  POINTS 


1018 

AF 

XRA 

A 

CLEAR  A 

1019 

014B10 

LXI 

B,MINDT 

MOVE  DATA  FROM 

101C 

114120 

LXI 

D , MEM  03 

TABLE  TO  MEMORY 

10  IF 

2615 

M  VI 

H,  15H 

2 1 D  BYTES 

1021 

CD4F00 

CALL 

BKMFA 

MOVE 

DEFAULT  UPDATE  COUNTER 

1024 

3E0D 

M  VI 

A,  0DH 

LOAD  DEFAULT  VALUE,  13D 

1026 

326520 

STA 

ICINV 

STORE  IN  INITIAL  VALUE 
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SET  AUX  FTN  STEPPING  STONES 


1029 

210020 

LXI 

H , SS AF0  POINT 

TO  1ST  STEP  STONE 

102C 

23 

INX 

H  POINT 

TO  ADDRESS 

102D 

010910 

LXI 

B , MST  EF  LOAD 

MOTOR  STOP  ADD 

1030 

71 

MOV 

M,C  STORE 

ADDRESS 

1031 

23 

INX 

H 

1032 

70 

MOV 

M,B 

1033 

23 

INX 

H 

1034 

23 

INX 

H 

1035 

010310 

LXI 

B , MSTFA  POINT 

TO  MOTOR  START 

1038 

71 

MOV 

M,C  STORE 

ADDRESS 

1039 

23 

INX 

H 

103A 

70 

MOV 

M,E 

103B 

23 

INX 

H 

103C 

23 

INX 

H 

103D 

010014 

LXI 

B , LINFF  LINE 

FREQUENCY  MONITOR 

1040 

71 

MOV 

M,C 

1041 

23 

INX 

H 

1042 

70 

MOV 

M,  B 

1043 

CD4900 

CALL  CLRFA  CLEAR 

DISPLAY 

1046 

El 

POP 

H  RESTORE  INT  REG 

1047 

D 1 

POP 

D 

1048 

Cl 

POP 

B 

1049 

FI 

POP 

PSW 

104A 

C9 

RET 

EXIT 

DATA 

TABLE 

104B 

000000 

MINDT: DB 

OOOH, OOOH, 000H 

CURRENT  CONTROL 

,  o 

104E 

51EBFB 

DB 

05 1  H, OEBH  , OFB  H 

PROPORTIONAL  GAIN, 

1051 

000000 

DB 

000H, OOOH, 000H 

INTEGRAL  GAIN, 

0 

1054 

7D000A 

DB 

07DH, 000H, OOAH 

RPM  SETPOINT,  1000 

1057 

000000 

DB 

OOOH, OOOH, OOOH 

PRESENT  RPM,  0 

105A 

599902 

DB 

059  H  , 099H  , 002  H 

CURRENT  LIMIT, 

2.  8 

105D 

000000 

DB 

OOOH, OOOH, OOOH 

PRESENT  CURRENT 

,  o 

. 


■ 


■ 


, 
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The  Motor  S tart  Function 


1060 

F5 

MSTST: PUSH 

PSW 

SAVE 

INT  REG 

1061 

C5 

POSH 

B 

1062 

D5 

PUSH 

D 

1063 

E5 

PUSH 

H 

1064 

AF 

XR  A 

A 

CLEAR 

A,FTN  FLAG 

1065 

320E20 

STA 

FTNFL 

TEST 

MAX  CURRENT 

1068 

3A5020 

LDA 

MEM08 

LOAD 

MS  MANT  BYTE 

106B 

A7 

ANA 

A 

TEST 

106C 

C27610 

JNZ 

MST01 

SKIP 

IF  CURRENT  ENTERED 

ELSE 

ERROR  EXIT 

106F 

E5 

PUSH 

:  h 

1070 

2160B5 

LXI 

H , 0B560H 

ERROR 

CODE  21 

1073 

C34000 

JMP 

ERRFA 

ERROR 

EXIT 

TEST 

RPM  SETPOINT 

1076 

3A4A20 

MST0 1 : LDA 

MEM06 

1079 

A7 

ANA 

A 

1C7A 

C28410 

JNZ 

MST02 

SKIP 

IF  DATA  ENTERED, 

ELSE 

ERROR  EXIT 

107D 

E5 

PUSH 

H 

107E 

21B5B5 

LXI 

H , 0B5B5H 

ERROR 

CODE  22 

1081 

C34000 

JMP 

ERRFA 

TEST 

GAIN  COEFICIENTS 

1084 

3A4720 

MST02: LDA 

MEM05 

LOAD 

INTEGRAL  GAIN 

1087 

A7 

ANA 

A 

1088 

C29910 

JNZ 

MST03 

SKIP 

IF  GAIN  NON  ZERO 

ELSE 

TEST  PROPORTIONAL 

108B 

3A4420 

LDA 

MEM04 

108E 

A7 

ANA 

A 

108F 

C29910 

JNZ 

MST03 

SKIP 

IF  NON  ZERO,  ELSE 

ERROR 

EXIT 

1092 

E5 

PUSH 

H 

1093 

21F4B5 

LXI 

H , 0B5F4H 

ERROR 

CODE  23 

1096 

C34000 

JMP 

ERRFA 

CLEAR 

TIME  AVE  CURRENT 

1099 

AF 

MSTO  3 : XR A 

A 

CLEAR 

A,  IAVEN 

109A 

213E20 

LXI 

H,MEM02 

POINT 

TO  1ST  BYTE 

109D 

77 

MOV 

M,  A 

109E 

23 

INX 

H 

109F 

77 

MOV 

M,  A 

10  AO 

23 

INX 

H 

10  A 1 

77 

MOV 

M,  A 
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CLEAR  OLD  INTEGRAL  CONTROL 


10A2 

215A20 

LXI 

H,CVIC1 

POINT  TO  DESTINATION 

10A5 

AE 

XR  A 

A 

CLEAR  A, MEMORY 

10A6 

77 

MOV 

M,  A 

10A7 

23 

INX 

H 

10A8 

77 

MOV 

M,  A 

10A9 

23 

INX 

H 

10  AA 

77 

MOV 

M,  A 

TURN  ON  SCR  *  S 

10AB 

3EFF 

MVI 

A , 0FFH 

SET  MOTOR  RUN  FLAG 

10  AD 

326220 

STA 

RUNFL 

10B0 

21 1 F20 

LXI 

H,FPV21 

LOAD  CONTROL 

10B3 

3640 

MVI 

M  ,  40H 

LOAD  STARTING  CONTROL 

10B5 

23 

INX 

H 

BINARY  2 

1 CB6 

3600 

MVI 

M  ,  00H 

10B8 

23 

INX 

H 

1 0B9 

3602 

MVI 

M,  02H 

10BB 

CD6E12 

CALL  CCUTS 

OUTPUT  CONTROL  TO  SCR'S 

10  BE 

3EDA 

MVI 

A, ODAH 

SET  SOD,  ENABLE  RST  7.5,  5.5 

10C0 

30 

SIM 

WRITE  MASK 

10C1 

3A6520 

LD  A 

ICINV 

LOAD  INT  COUNTER  INIT  VALUE 

1 0C4 

326420 

STA 

INTCT 

INITIALIZE  INTERRUPT  COUNTER 

10C7 

El 

POP 

H 

10C8 

D  1 

POP 

D 

10C9 

Cl 

POP 

B 

1 0CA 

FI 

POP 

PSW 

10CB 

C9 

RET 

The  Motor  Control  Update  Routine 


10CC 

CD240C 

CUPST: CALL  FPDSF 

SAVE  INT  REGS, 

F.P.  WORKSPACE 

TEST  RPM  SETPOINT 

10CF 

3A4A20 

LDA  MEM06 

READ  MS  MANT  BYTE  OF 

RPM  SETPOINT 

10D2 

A7 

ANA  A 

TEST 

1  0D3 

C2DC10 

JNZ  CUP01 

SKI E  IF  NOT  ZERO, ELSE 

10D6 

CD0A13 

CALL  MSTPS 

STOP  MOTOR 

10D9 

C3E810 

JMP  CUPOE 

GO  TO  END 

READ  RPM 

10  DC 

CD0614 

CUP 0 1 : CALL  RPMFA 

READ  RPM,  DATA  RETURNED 
IN  FPV2N,  MEM07 

,  . 


. 

.  . 
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10  DF  CDA611  CALL  CCONS 


10E2  CD6E12  CALL  CCUTS 


10E5 

CDF210 

CALL  TSTIS 

10E8 

3A6520 

CUPO  E: LD A  ICINV 

10EB 

326420 

STA  INTCT 

10  EE 

CD270C 

CALL  FPDRF 

10F1 

C9 

RET 

The  < 

Current 

Test  Routine 

10F2 

CD0914 

TSTIS: CALL  RD1FA 

10F5 

011F20 

LXI 

B , FP V2 1 

10F8 

11  1C20 

LXI 

D , FPV 1 1 

1 0FB 

2603 

MVI 

H  ,  03H 

10FD 

CD4F00 

CALL 

BKMFA 

1100 

21  1F20 

LXI 

H , FP  V21 

1103 

3650 

MVI 

M  ,  50H 

1105 

23 

INX 

H 

1106 

3600 

MVI 

M  ,  00H 

1108 

23 

INX 

H 

1109 

3603 

MVI 

M,  03H 

11  OB 

CD0304 

CALL 

DIVFA 

11  OE 

015020 

LXI 

B , MEM  08 

1111 

11 1C20 

LXI 

D , FP V 1 1 

1114 

2603 

MVI 

H  ,  03H 

1116 

CD4F00 

CALL 

BKMFA 

1119 

CD0904 

CALL 

SUBFA 

11  1C 

3A1F20 

LD  A 

FPV21 

11  IF 

A7 

ANA 

A 

1120 

F22D1 1 

JP  TSTI1 

1123 

CDO  A 1 3 

CALL 

MSTPS 

CALCULATE  NEW  CONTROL  VALUE 
RESULT  IN  FPV2N 

OUTPUT  CONTROL 


OUTPUT  CONTROL  TO  SCR'S 
TEST  CURRENT 


TEST  FOR  OVER  CURRENT 

LOAE  INT  COUNTER  INIT  VALUE 
INITIALIZE  INT  COUNTER 
RESTORE  INT  REG, 

F.P.  SCRATCHPAD 
RETURN  FROM  INTERRUPT 


READ  CURRENT  FROM  A/D 
CURRENT  IN  FPV2N,  MEMO  9 

TEST  INSTANTANEOUS  CURRENT 


MOVE  CURRENT 
TO  DIVIDEND 

MOVE 

POINT  TO  DEVISOR 
LOAD  BINARY  5 


DIVIDE  INST  CURRENT 
BY  SCALING  FACTOR 
MOVE  MAX  CURRENT 
TO  MINUEND 

MOVE 

SUBTRACT  SCALED  CURRENT 
FROM  CURRENT  LIMIT 
LOAD  MS  MANT  BYTE 
TEST 

SKIP  IF  POSITIVE,  ELSE 
INST  OVERCURRENT  ERROR 


STOP  MOTOR 


. 
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1126  E5  PUSH  H 

1127  2166B5  LXI  H.0B566H  ERE CE  CODE  24 


112A 

C34000 

JMP 

ERRFA 

11  2D 

015320 

TSTI1: LXI 

B , MEM  09 

1130 

11 1F20 

LXI 

D,FPV21 

1133 

2603 

MV  I 

H,  03 

1135 

CD4F00 

CALL 

BKMFA 

1138 

21 1C20 

LXI 

H, FP  V  1 1 

113B 

3646 

M  VI 

M,46H 

1 1  3D 

23 

INX 

H 

113E 

3645 

M  VI 

M  r  45H 

1140 

23 

INX 

H 

1141 

3600 

M  VI 

M  ,00H 

1143 

CD0004 

CALL 

MULFA 

1146 

01 1F20 

LXI 

B,FPV21 

1149 

1 1 1C20 

LXI 

D , FP V 1 1 

114C 

2603 

M  VI 

H,03H 

11  4E 

CD4F00 

CALL 

BKMFA 

1151 

013E20 

LXI 

B, MEM02 

1154 

11 1 F20 

LXI 

D , FP V2 1 

1157 

2603 

M  VI 

H ,  03H 

1159 

CD4F00 

CALL 

BKMFA 

115C 

CD0904 

CALL 

SUBFA 

115F 

21 1C20 

LXI 

H,FPV1 1 

1162 

3668 

M  VI 

M  ,68H 

1164 

23 

INX 

H 

1165 

36DB 

MVI 

M,0DBH 

1167 

23 

INX 

H 

1168 

36F5 

MVI 

M , 0F5H 

116A 

CD0004 

CALL 

MULFA 

116D 

013E20 

LXI 

B, MEM02 

1170 

1 1 1 C20 

LXI 

D , FP V 1 1 

1173 

2603 

MVI 

H ,  03H 

1175 

CD4F00 

CALL 

,  BKMFA 

1178 

CD0604 

CALL 

,  ADDFA 

117B 

01 1F20 

LXI 

B,FPV21 

117E 

113E20 

LXI 

D , MEM02 

1181 

2603 

MVI 

H,  03H 

1183 

CD4F00 

CALL 

BKMFA 

1186 

015020 

LXI 

B , MEM08 

11  89 

11 1C20 

LXI 

D , FP  V 1 1 

118C 

2603 

MVI 

H,  03H 

118E 

CD4F00 

CALI 

,  BKMFA 

1191 

CD0904 

CALL 

SUBFA 

1194 

3A1F20 

LD  A 

FPV21 

1197 

A7 

ANA 

A 

1198 

F2A51 1 

JP  TSTI2 

TEST  AVERAGE  CURRENT 


LOAD  INSTANTANEOUS  CURRENT 
TO  MULTIPLIER 

MOVE  DATA 

LOAD  SCALING  FACTOR 
LOAD  BINARY  -  549  D 


MULTIPLY,  RESULT  IN  FPV2N 
MOVE  INST  CURRENT 
TO  MINUEND 


MOVE  OLD  AVE  CURRENT 
TO  SUBTRAHEND 

MOVE 

SUBTRACT 

LOAD  GAIN  CONSTANT 
LOAD  BINARY  -0004 


MULTIPLY  TO  GET  OFFSET 
LOAD  OLD  AVE  CURRENT 
TO  ADDEND 

MOVE 

ADD  TO  GET  NEW  AVE  CURRENT 
STORE  NEW 
AVERAGE  CURRENT 

MOVE 

LOAD  CURRENT  LIMIT 


MOVE 

SUBTRACT  AVE  CURRENT 

FROM  CURRENT  LIMIT 

LOAD  MS  MANT  BYTE  OF  RESULT 

TEST 

SKIP  IF  POS,  ELSE 


.. 


. 

■ 

AVE  OVERCURRENT  EXIT 


119B 

CD0A13 

CALL  MSTPS 

STOP 

MOTOR 

119E 

E5 

PUSH  H 

119F 

21D6B5 

LXI  H , 0B5D6H 

LOAD 

ERROR  CODE  25 

11  A2 

C34000 

JMP  ERRFA 

11A5 

C  9 

TSTI2: RET 

Calculation  of  Control  Output 


PRESENT  RPM  IN  FPV2N,  MEM07 
CALCULATE  ERROR 


11A6 

014A20 

CCONS:  LXI 

B , MEM06 

MOVE  RPM  SETPOINT 

11  A9 

11 1C20 

LXI 

D,FPV11 

TO  MINUEND 

11  AC 

2603 

MVI 

H  ,  03H 

11  AE 

CD4F00 

CALL 

BKMFA 

MOVE 

11B1 

CD0904 

CALL 

SUBFA 

SUBTRACT  RPM  FROM  SETPOINT 

11  B4 

01 1F20 

LXI 

B, FPV21 

SAVE  ERROR  IN 

11  B7 

115F20 

LXI 

D,CUTR1 

TEMPORARY  REGISTER 

1 1  EA 

2603 

MVI 

H,  03H 

1 1  BC 

CD4F00 

CALL 

BKMFA 

1 1  BF 

3A4720 

LDA 

MEM05 

LOAD  MS  BYTE  OF  INTEGRAL 
CONTROL  GAIN  CONSTANT 

11C2 

A7 

ANA 

A 

TEST 

11C3 

C2D21 1 

JNZ 

CCON1 

SKIP  IF  NOT  ZERO,  ELSE 

ZERO  INTEGRAL  CONTROL 


11C6 

AF 

XR  A 

A 

CLEAR  A 

1 1C7 

215A20 

LXI 

H , CVIC 1 

POINT  TO  INTEGRAL  CONTROL 

1 1  C  A 

77 

MOV 

M,  A 

1 1 CB 

23 

INX 

H 

11CC 

77 

MOV 

M,  A 

1 1CD 

23 

INX 

H 

1 1  CE 

77 

MOV 

M,  A 

1 1  CF 

C3 IF  12 

JMP 

CC0N4 

CALC  PROPORTIONAL  CONTROL 

11D2 

014720 

CCON  1 : LXI 

B , MEM  05 

MOVE  INTEGRAL  GAIN 

11D5 

11 1C20 

LXI 

D , FP  V 1 1 

TO  MULTIPLICAND 

11D8 

2603 

MVI 

H,  03H 

11  DA 

CD4F00 

CALL 

BKMFA 

MOVE 

11DD 

CD0004 

CALL 

MULFA 

MULTIPLY 

1 1  EO 

015A20 

LXI 

B  ,CVIC1 

MOVE  OLD  CONTROL 

11E3 

11  1C20 

LXI 

D , FP V 1 1 

TO  ADDEND 

1 1E6 

2603 

MVI 

H  ,  03H 

11E8 

CD4F00 

CALL 

BKMFA 

MOVE 

1 1  EB 

CD0604 

CALL 

ADDF  A 

ADD  TO  GET  NEW  INT  CONT 

<- 

. 

• 
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11  EE 

3A2120 

LDA 

FPV23 

1 1 F 1 

D602 

SUI 

02H 

11F3 

FA0412 

JM  CCON2 

11F6 

21 1F20 

LXI 

H,FPV21 

11F9 

3640 

M  VI 

M  ,  40H 

11FB 

23 

INX 

H 

1 1  FC 

3600 

MVI 

M  ,  00H 

1 1FE 

23 

INX 

H 

1 1  FF 

3602 

MVI 

M ,  02H 

1201 

C31412 

JMP 

CCON3 

1204 

3A1F20 

CCON2: LDA 

FPV21 

1207 

A7 

ANA 

A 

1208 

F21412 

JP  CCON3 

12  OB 

21 1F20 

LXI 

H , FPV2 1 

12  OE 

AF 

XR  A 

A 

12  OF 

77 

MOV 

M,  A 

1210 

23 

INX 

H 

1211 

77 

MOV 

M,  A 

1212 

23 

INX 

H 

1213 

77 

MOV 

M,  A 

1214 

01 1F20 

CCON3:  LXI 

B , FP V2 1 

1217 

115A20 

LXI 

D , CVIC1 

12  1 A 

2603 

MVI 

H ,  03H 

1 2  1C 

CD4F00 

CALI 

,  BKMFA 

1 2  IF 

3A4420 

CCON4: LDA 

MEMO  4 

1222 

A7 

ANA 

A 

1223 

CA5712 

JZ  CCON5 

1226 

015F20 

LXI 

B , CUTR1 

1229 

11 1 C20 

LXI 

D , FPV 1 1 

122C 

2603 

MVI 

H ,  03H 

1 22E 

CD4F00 

CALL 

BKMFA 

1231 

014420 

LXI 

B , MEM  04 

1234 

11 1F20 

LXI 

D , FP V2 1 

1237 

2603 

MVI 

H,  03H 

1239 

CD4F00 

CALL 

BKMFA 

12  3C 

CD0004 

CALL 

MULFA 

123F 

3A5A20 

LDA 

C  VIC  1 

1242 

A7 

ANA 

A 

1243 

CA6212 

JZ  ( 

SCONE 

1246 

015A20 

LXI 

B , C VIC  1 

1249 

11  1C20 

LXI 

D , FP V 1 1 

124C 

2603 

MVI 

H,  03H 

CLIP  INTEGRAL  CONTROL  VALUE 


LOAE  EXPONENT 
SUBTRACT  2 

SKIP  IF  CONTROL  L.T.  2.0, 
ELSE  SET  CONTROL  TO  2.0 


CONTINUE 
LOAD  MANTISSA 
TEST 

SKIP  IF  MANT  POS,  ELSE 
ZERO  CONTROL  OUTPUT 
CLEAR  A 


STORE  NEW  CONTROL 
IN  CLD  CONTROL 

MOVE 

PROPORTIONAL  CONTROL 


LOAD  MS  MANT  BYTE  OF 
PROP  GAIN  CONSTANT 
TEST 

IF  ZERO,  OUTPUT  INT  CONT  ONLY 
ELSE  CALC  PROP  CONTROL 
MOVE  ERROR 
TO  MULTIPLICAND 

MOVE 

MOVE  PROP  GAIN 
TO  MULTIPLIER 

MOVE 

CALC  PROP  CONTROL,  IN  FPV2N 
ADD  PROP  PLUS  INT  CONT 


LOAE  MS  MANT  BYTE  OF 
INTEGRAL  CONTROL 
TEST 

NO  NEED  TO  ADD  SINCE  ZERO 
MOVE  INTEGRAL  CONTROL 
TO  ADDEND 


. 


‘ 


. 
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124E 

CD4F00 

CALL 

BKMFA 

MOVE 

1251 

CD0604 

CALL 

ADDFA 

ADD  CONTROL  OUTPUTS 

1254 

C36212 

JMP 

CCONE 

RETURN  TO  CONTROL 

OUTPUT 

1257 

015A20 

CCON5: LXI 

B, CVIC1 

MOVE  INT  CONTROL 

12  5A 

11  1F20 

LXI 

D , FP  V2 1 

TO  OUTPUT  LOCN 

125D 

2603 

M  VI 

H ,  03H 

125F 

CD4F00 

CALL 

BKMFA 

MOVE 

STORE  CONTROL  IN 

MEMORY  REG 

1262 

01  1F20 

CCONE: LXI 

B,FPV21 

MOVE  CONTROL  FROM 

FPV2N 

1265 

114120 

LXI 

D , MEM03 

TO  MEMORY 

1268 

2603 

M  VI 

H,  03H 

126A 

CD4F00 

CALL 

BKMFA 

MOVE  DATA 

126D 

C9 

RET 

Output  of  Control  Voltage 


126E 

21  IF 20 

COUTS: LXI 

H , FPV21 

LOAD 

CONTROL  VALUE 

1271 

46 

MOV 

B,  M 

LOAD 

MS  MANT  BYTE 

1272 

23 

INX 

H 

1273 

4E 

MOV 

C,M 

1274 

23 

INX 

H 

1275 

56 

MOV 

D,  M 

LOAD 

EXPONENT 

TEST 

FOR  NEGATIVE  CONTROL 

1276 

78 

MOV 

A  ,  B 

LOAD 

MS  MANT  BYTE 

1277 

A7 

ANA 

A 

TEST 

1278 

FA7E12 

JM  COUT1 

SKIP 

TO  NEG  OUTPUT  IF  MINUS 

127B 

C28412 

JNZ 

COUT2 

CONT 

IF  POS,  ELSE 

NEGATIVE  CONTROL  OUTPUT 

127E 

21FFFF 

COUT 1 : LXI 

H , 0FFFFH 

LOAD 

MAX  COUNT 

FOR  ZERO  OUTPUT 

1281 

C3DF12 

JM  P 

COUTE 

GO  TC 

)  END 

TEST 

FOR  CONTROL  G.T.E. 

O  1 

•  I 

CM  1 

i 

1284 

7  A 

COUT  2 : MO  V 

A,  D 

LOAD 

EXPONENT 

1285 

3D 

DCR 

A 

DECREMENT 

1286 

CA9212 

JZ  COUT3 

SKIP 

IF  EXP  WAS  1 

1289 

FA9C12 

JM  COUT4 

SKIP 

IF  EXP  L.T.E.  0.0, 

ELSE 

CONTROL  G.T.E.  2.0 

128C 

210100 

LXI 

H, 0001H 

LOAD 

MIN  COUNT  TO 

GIVE 

MAX  OUTPUT 

128F 

C3DF12 

JMP 

COUTE 

GO  TO  END 

. 

. 

. 

‘ 

.  . 

• 
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EXP  WAS  1,  SHIFT  LEFT 


1292 

A7 

COUT3 : ANA  A 

CLEAR  CARRY 

1293 

79 

MOV  A,C 

1294 

17 

RAL 

SHIFT  LS  BYTE 

1295 

4F 

MOV  C,A 

1296 

78 

MOV  A,B 

1297 

17 

RAL 

SHIFT  MS  BYTE 

1298 

47 

MOV  B,A 

1299 

C3AB12 

JMP  COUT5 

CONVERT  TO  COUNT 

EXP  L.T.E.  0 

129C 

7  A 

COUT4: MOV  A,D 

LOAD  EXPONENT 

129D 

A7 

ANA  A 

TEST,  CLEAR  CY 

129E 

CAAB12 

JZ  COUT5 

CONVERT  TO  COUNT,  ELSE 
SHIFT  RIGHT 

12A1 

78 

MOV  A,B 

12A2 

IF 

RAR 

SHIFT  MS  BYTE 

12  A3 

47 

MOV  B,  A 

12A4 

79 

MOV  A,C 

12A5 

IF 

RAR 

SHIFT  LS  BYTE 

12A6 

4F 

MOV  C,A 

12A7 

14 

INR  D 

INCREMENT  EXPONENT 

12A8 

C39C12 

JMP  COUT4 

RETEST  EXPONENT 

CONVERT  CONTROL  TO  COUNT 

BC  -  LIMITED  INTEGER  COUNT 

12  AB 

2 1EA12 

COUT5: LXI  H , EXTBL 

POINT  TO  1ST  TABLE  ENTRY 

12  AE 

AF 

XR A  A 

CLEAR  A , D 

12  AF 

57 

MOV  D, A 

12B0 

78 

MOV  A  ,  B 

LOAD  MS  CONTROL  BYTE 

12B1 

E6E0 

ANI  OE OH 

MASK  FOR  MS  3  BITS 

12B3 

OF 

RRC 

MULT  BY  4  TO  GET 

12B4 

OF 

RRC 

ADDRESS  OFFSET 

12B5 

OF 

RRC 

12B6 

5F 

MOV  E  ,  A 

LOAD  TO  OFFSET 

12B7 

19 

DAD  D 

SELECT  DATA 

12E8 

56 

MOV  D  ,  M 

LOAD  BASE  COUNT 

12B9 

23 

INX  H 

12EA 

5E 

MOV  E,M 

12BB 

23 

INX  H 

12BC 

D5 

PUSH  D 

STORE  ON  STACK 

12BD 

56 

MOV  D,M 

LOAD  CONSTANT 

12  BE 

23 

INX  H 

12  EF 

5E 

MOV  E,M 

.  .  . 


. 

. 
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FORM  SCALING  FRACTION 


12C0 

2603 

M  VI 

H,  03H 

12C2 

A7 

COUT6: ANA 

A 

12C3 

79 

MOV 

A,C 

12C4 

17 

RAL 

12C5 

4F 

MOV 

C,  A 

12C6 

78 

MOV 

A,  B 

12C7 

17 

RAL 

12C8 

47 

MOV 

B,  A 

12C9 

25 

DCR 

H 

12CA 

C2C212 

JNZ 

COUT6 

12CD 

CD  1504 

CALI 

,  M16BF 

12D0 

AF 

XRA 

A 

12D1 

47 

MOV 

B,A 

12D2 

7C 

MOV 

A,  H 

12D3 

2F 

CMA 

12D4 

67 

MOV 

H,  A 

12D5 

7D 

MOV 

A  ,  L 

12D6 

2F 

CMA 

12D7 

C601 

ADI 

01  H 

12D9 

6F 

MOV 

L,  A 

12DA 

7C 

MOV 

A  ,  H 

12DB 

88 

ADC 

B 

12  DC 

67 

MOV 

H  ,  A 

12  DD 

D 1 

POP 

D 

12DE 

19 

DAD 

D 

1 2  DF 

3E3  2 

COUTE: MVI 

A  ,  32H 

12E1 

D3FF 

OUT 

TIM  1 C 

12E3 

7D 

MOV 

A,L 

12E4 

D3FC 

OUT 

TIM  1  0 

12E6 

7C 

MOV 

A  ,  H 

12E7 

D3FC 

OUT 

TIM  1  0 

12E9 

C9 

COUTX: RET 

LOAD  LOOP  COUNTER 
CLEAR  CY 

SHIFT  LS  BYTE 


SHIFT  MS  BYTE 

DECREMENT  COUNTER 
REPEAT  UNTIL  DONE 
MULTIPLY,  RESULT  IN  HL,  DE 
SCALING  FACTOR  IN  HL 
CLEAR  A, B 


COMPLEMENT  MS  BYTE 


COMPLEMENT  LS  BYTE 
INCREMENT 


ADD  CY  TO  MS  BYTE 

LOAD  BASE  COUNT 

SUB  OFFSET  FROM  BASE  COUNT 

TIMER  COUNT  NOW  IN  HL 

SELECT  MODE  1,  BINARY 

WRITE  TO  TIMER  0 

LOAD  LS  TIMER  BYTE 

OUTPUT 

LOAD  MS  TIMER  BYTE 


EXTRAPOLATION  TABLE 


12EA  208D077D  EXTBL : DB 


12EE  1911035D  DB 
12F2  1 5E402CE  DB 
12F6  1 2E6029F  DB 
12FA  1 04702 AO  DB 
12FE  0DA702CD  DB 
1302  0ADA035D  DB 
1306  077D077D  DB 


020H,08DH, 0  07H, 07DH 
019H,011H,003H,05DH 
015H,0B4H,0C2H,0CEH 
012H,OE6H,002H,09FH 
0  10H,047H, 002H, OAOH 
00DH,0A7H,0C2H,0CDH 
00AH,0DAH,003H,05DH 
0C7H,07DH, 007H, 07DH 


• 
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The  Motor  Stop 

Routine 

13  0A 

F5  MSTP S: PUSH  PSW 

SAVE  INI  REGS 

130B 

C5 

PUSH  B 

130C 

D5 

PUSH  D 

13  0D 

E5 

PUSH  H 

13  0E 

AF 

XRA  A 

CLEAR  A,  FTN  FLAG 

1 3  OF 

320E20 

STA  FTNFL 

1312 

3E32 

MVI  A , 32H 

SELECT  MODE  1 ,  BINARY 

1314 

D3FF 

OUT  TIM1C 

INITIALIZE  TIMER  0 

1316 

3E0E 

MVI  A  ,  OEH 

MASK  RST  7.5,  6.5 

1318 

30 

SIM 

WRITE  INTERRUPT  MASK 

1319 

AF 

XRA  A 

CLEAR  A,  MOTOR  RUN  FLAG 

13  1  A 

326220 

STA  RU NFL 

13  ID 

El 

POP  H 

131E 

D 1 

POP  D 

13  IF 

Cl 

POP  B 

1320 

FI 

POP  PSK 

1321 

C9 

RET 

Forwarding 

Addresses 

1400 

C30C14 

LINFF: JMP 

LINES 

LINE 

FREQUENCY 

1403 

C37E14 

RPMIF : JMP 

RPMIS 

RPM 

PULSE  INT 

1406 

C3D314 

RPMFA: JMP 

RPMST 

CALC 

RPM 

1409 

C32E15 

RDIFA: JMP 

RDIST 

READ 

CURRENT 

Line  Frequency  M cnitoring  Routine 


140C 

F5 

LINFS: PUSH  PSW 

140D 

C5 

PUSH  B 

14  OE 

D5 

PUSH  D 

14  OF 

E5 

PUSH  H 

1410 

CD4900 

CALL  CLRFA 

CLEAR  DISP,  FTN 

FLAG 

1413 

F3 

DI 

DISABLE  INTERRUPTS 

1414 

CD6314 

CALL  LINFW 

WAIT  FOR  RISING 
OF  ZCD  PULSE 

EDGE 

1417 

3E70 

MVI  A , 7  OH 

SELECT  COUNTER  1 

,  MODE  0 

1419 

D3FF 

OUT  TIM1C 

14  IB 

3EFF 

MVI  A , OFFH 

14  ID 

D3FD 

OUT  TIM11 

14  IF 

D3FD 

OUT  TIM11 

START  TIMER 

1421 

06  14 

MVI  B, 14H 

LOAD  20D  TO  PULSE  COUNTER 

. 
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1423 

CD6314 

LINF  1 : CALL  LINFW 

1426 

05 

DCR  B 

1427 

C22314 

JNZ  LINF1 

14  2  A 

3E40 

M VI  A , 40H 

142C 

D3FF 

OUT  TIM1C 

142E 

212720 

LXI  H , SHFT5 

1431 

36  OF 

MV I  M , OFH 

1433 

2B 

DCX  H 

1434 

AF 

XR A  A 

1435 

77 

MOV  M, A 

1436 

2B 

DCX  H 

1437 

77 

MOV  M , A 

1438 

2B 

DCX  H 

1439 

DBFD 

IN  TIM  1 1 

143B 

2F 

CMA 

143C 

77 

MOV  M , A 

143D 

2B 

DCX  H 

1 43E 

DBFD 

IN  TIM  11 

1440 

2F 

CMA 

1441 

77 

MOV  M  ,  A 

1442 

AF 

XRA  A 

1443 

322220 

STA  SIGNF 

1446 

CD0C04 

CALL  NRMFA 

1449 

21 1C20 

LXI  H , FP V 1 1 

14  4C 

367A 

M VI  M , 7AH 

144E 

23 

INX  H 

1 44F 

36  12 

MVI  M,12H 

1451 

23 

INX  H 

1452 

3614 

MVI  M , 1 4H 

1454 

CD0304 

CALL  DIVFA 

1457 

CD0308 

CALL  BTDFA 

14  5A 

CD210C 

CALL  DDSFA 

145D 

FB 

El 

145E 

El 

POP  H 

145F 

D  1 

POP  D 

1460 

Cl 

POP  B 

1461 

F  1 

POP  PSW 

1462 

C9 

RET 

1463 

3E05 

LINF  W: M VI 

A,  05H 

1465 

3D 

LFW01: DCR 

A 

1466 

C26514 

JNZ 

LFW01 

1469 

DBF  1 

LFW02:IN 

FFDAT 

146B 

E608 

ANI 

08H 

146D 

CA6914 

JZ 

LFW02 

1470 

3E05 

MVI 

A,  05H 

1472 

3D 

LFW03: DCR 

A 

1473 

C27214 

JNZ 

LFW03 

WAIT  FOR  RISING  EDGE 
OF  ZCD  PULSE 
DECREMENT  PULSE  COUNTER 
REPEAT  20  TIMES 

READ  TIMER 


LATCH  TIMER  1 

POINT  TO  NORM  ROUTINE  DATA 
LOAD  EXPONENT,  15D 

CLEAR  A 

CLEAR  2  LS  BYTES 


READ  LS  COUNT  BYTE 

COMPLEMENT 

STORE 

READ  MS  COUNT  BYTE 


CLEAR  A,  SIGN  FLAG 

NORMALIZE,  DATA  NOW  IN  FPV2N 
POINT  TO  DIVIDEND 
LOAD  BINARY  1.0  E  6 


DIVIDE  1.0  E  6  BY  PERIOD 
CONVERT  TO  DECIMAL 
DISPLAY  RESULT 
REENABLE  INTERRUPTS 
RESTORE  INT  REGS 


RETURN 

WAIT  FOR  RISING  ZCD  EDGE 


DELAY  LOOP 


READ  FLOP  FLOPS 
MASK  FOR  ZCD  BIT 
WAIT  FOR  HIGH  REGION 
DELAY  LOOP 


. 

. 

■ 
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1476 

DBF  1 

LFW04: IN 

FFDAT 

1478 

E608 

ANI 

08H 

147A 

C27614 

JNZ 

LFW04 

147D 

C9 

RET 

Optical  Tachometer  Interrupt 


147E 

F5 

RPMI S : PUSH  PSW 

1 47F 

C5 

PUSH  B 

1480 

D5 

PUSH  D 

1481 

E5 

PUSH  H 

1482 

3ECE 

M VI  A , OCEH 

1484 

30 

SIM 

1485 

FB 

El 

1486 

3A6220 

LDA  RU NFL 

1489 

A7 

ANA  A 

14  8A 

CACE14 

JZ  RPMIX 

148D 

3A6420 

LDA  INTCT 

1490 

3D 

DCR  A 

1491 

326420 

STA  INTCT 

1494 

C2BA14 

JNZ  RPMI3 

1497 

DBF  1 

IN 

FFDAT 

1499 

E604 

ANI 

04H 

149B 

C2A714 

JNZ 

RPMI1 

1 49E 

21FFFF 

L  XI 

H , OFFFFH 

14A1 

225820 

SHLD 

'  RPMCT 

14A4 

C3B414 

JMP 

RPMI2 

14A7 

3E80 

RPMI 1 : MVI 

A,  80H 

14A9 

D3FF 

OUT 

TIM1C 

1 4  AB 

DBFE 

IN  TIM12 

14  AD 

6F 

MOV 

L,  A 

1 4  AE 

DBFE 

IN  TIM  1 2 

14E0 

67 

MOV 

H,  A 

14E1 

225820 

SHLD 

'  RPMCT 

1 4E4 

CD06 10 

RPMI2: CALL 

,  CUPFA 

14E7 

C3CA14 

JMP 

RPMIE 

14BA 

3D 

RPMI 3  :DCR 

A 

14  BB 

C2CA14 

JNZ 

RPMIE 

14  EE 

3EB0 

MVI 

A  ,  OBOH 

14C0 

D3FF 

OUT 

TIM  1C 

1 4C2 

3EFF 

MVI 

A , OFFH 

14C4 

D3FE 

OUT 

TIM12 

READ  FLOP  FLOPS 
MASK  FOR  ZCD  BIT 
WAIT  FOR  INVERTED 
RISING  EDGE 
EDGE  DETECTED ,  RETURN 


rvice  Routine 


SAVE  INT  REGS 


SET  SOD ,  MASK  RST  6.5,  7.5 

WRITE  MASK 

ENABLE  INTERRUPTS 

LOAD  RUN  FLAG 

TEST 

EXIT  IF  NOT  SET 

LOAD  INTERRUPT  COUNTER 

DECREMENT 

STORE 

SKIP  IF  NOT  ZERO,  ELSE 
UPDATE  CONTROL 


READ  FLIP  FLOP  DATA 

MASK  FOR  COUNT  OVERRUN  BIT 

SKIP  IF  VALID,  ELSE 

RPM  EELOW  LOWER  LIMIT 


LOAD  0  RPM  COUNT 

STORE 

CONTINUE 

LATCH  COUNTER 

WRITE  TO  COUNTER  2 

LOAD  LS  COUNT  EYTE 

IN  MS  BYTE 

STORE  COUNT 

UPDATE  CONTROL  OUTPUT 

GO  TO  END 

DECREMENT  TO  TEST  FOR  1 
GO  TO  END  IF  NOT  1,  ELSE 
RESET  RPM  COUNTER 
OUTPUT  TO  TIMER  2 
LOAD  COUNT  START 
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14C6 

D3FE 

OUT 

TIM12 

START  TIMER 

14C8 

D3F3 

OUT 

TRS12 

RESET  OVERRUN  FLAG 

1 4CA 

3E5A 

RPMIE: MVI 

A  ,  5AH 

CLEAR  SOD,  RST  7.5 

1 4CC 

30 

SIM 

SET  MASK 

1 4CD 

FB 

El 

ENABLE  INTERRUPTS 

14CE 

El 

RPMIX : POP 

H 

RESTORE  INT  REG 

1 4  CF 

D1 

POP 

D 

14D0 

Cl 

POP 

B 

14D1 

FI 

POP 

PSW 

14D2 

C9 

RET 

RPM  Reading  and  Conversion 


14D3 

2A5820 

RPMST :LHLD  RPMCT 

14D6 

3EFF 

MVI 

A, OFEH 

14D8 

BC 

CMP 

H 

14D9 

C2F414 

JNZ 

RPM01 

1 4  DC 

BD 

CMP 

L 

14DD 

C2E414 

JNZ 

RPM01 

14E0 

AF 

XRA 

A 

14E1 

21  1F20 

LXI 

H , FPV2 1 

1 4E4 

77 

MOV 

M,  A 

14E5 

23 

INX 

H 

14E6 

77 

MOV 

M,  A 

14E7 

23 

INX 

H 

14E8 

77 

MOV 

M,  A 

1 4E9 

214D20 

LXI 

H, MEM07 

1 4EC 

77 

MOV 

M,  A 

14ED 

23 

INX 

H 

1 4EE 

77 

MOV 

M,  A 

14EF 

23 

INX 

H 

1 4F0 

77 

MOV 

M,  A 

14E  1 

C32D15 

JMP 

RPM03 

14F4 

7C 

RPMO  1  :MOV 

A,  H 

14F5 

2F 

CM  A 

1 4F6 

57 

MOV 

D,  A 

14F7 

7D 

MOV 

A  ,  L 

14E8 

2F 

CM  A 

1 4F9 

C608 

ADI 

08H 

1 4FB 

5F 

MOV 

E,  A 

14FC 

D20015 

JNC 

RPM  02 

14FF 

14 

INR 

D 

1500 

212720 

RPM  0  2 : L  XI 

H , SHFT5 

1503 

3617 

MVI 

M  ,  17H 

1505 

2B 

DCX 

H 

1506 

AF 

XRA 

A 

1507 

77 

MOV 

M,  A 

LOAD  RPM  COUNT 

LOAD  TEST  BYTE 

TEST  MS  BYTE 

SKIP  IF  COUNT  NON  ZERO, 

ELSE  TEST  LS  BYTE 

ELSE  TEST  LS  BYTE 

SKIP  TO  VALID  COUNT  ROUTINE, 

ELSE  LOAD  ZERO  RPM 

CLEAR  FPV2N 


ZERO  RPM  IN  MEMORY 


EXIT 

LOAD  MS  BYTE 
ONES  COMPLEMENT 
STORE  IN  DE 


ADD  08  TO  COMPENSATE  FOR 
COUNTER  LATCHING  OFFSET 

SKIP  IF  NO  CARRY,  ELSE 
INCREMENT  MS  BYTE 
POINT  TO  EXP 
LOAD  EXPONENT,  23D 

CLEAR  A 


. 

• 
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1508 

2B 

DCX 

H 

1509 

73 

MOV 

M,E 

15CA 

2B 

DCX 

H 

150B 

72 

MOV 

M  r  D 

150C 

2B 

DCX 

H 

150D 

77 

MOV 

M  ,  A 

150E 

322220 

STA 

SIGNF 

1511 

CD0C04 

CALL 

,  NRMFA 

1514 

21  1C20 

LXI 

H  *  FP V 1 1 

1517 

3672 

M  VI 

M,72H 

1519 

23 

INX 

H 

1 5 1 A 

3672 

M  VI 

M,  72H 

15  1C 

23 

INX 

H 

15  1 D 

3617 

MVI 

M,  17H 

15  IF 

CD0304 

CALL 

,  DIVFA 

1522 

01 1F20 

LXI 

B , FPV21 

1525 

114D20 

LXI 

D , MEM07 

1528 

2603 

MVI 

H  ,  03H 

152A 

CD4F00 

CALL 

,  BKMFA 

152D 

C9 

RPM0  3 : RET 

Reading  and 

Conversion 

Of  SCR 

152E 

D3F4 

RDIST: OUT 

LATSH 

1530 

3E04 

MVI 

A  ,  04H 

1532 

3D 

RDI0  1: DCR 

A 

1533 

C23215 

JNZ 

RDI01 

1536 

D3F0 

OUT 

ADC01 

1538 

3E02 

MVI 

A  ,  02H 

1 53  A 

3D 

PDI02: DCR 

A 

153B 

C23A15 

JNZ 

RDI02 

153E 

DBF  1 

RDI0 3: IN  FFDAT 

1540 

E601 

ANI  0  1  H 

1542 

CA3E15 

JZ  RDI03 

1545 

3E0F 

MVI  A , 0FH 

1547 

3D 

RDIO 4: DCR  A 

1548 

C24715 

JNZ  RDI04 

154B 

DBF0 

IN  ADC01 

154D 

212320 

LXI  H , SHFT1 

1550 

0600 

MVI  B , 00H 

1552 

70 

MOV  M,B 

1553 

23 

INX  H 

1554 

77 

MOV  M , A 

LOAD  MS  BYTE 

CLEAR  SIGN  FLAG 

NORMALIZE  TIME  COUNT 

LOAD  CONSTANT 

LOAD  BINARY  7.5  E  6 

TO  DIVIDEND 

FOE  8  PULSES  PER  REV 


DIVIDE  TO  GET  RPM 
MOVE  RPM  TO  MEMORY 


MOVE  DATA 
EXIT 


Current 


LATCH  SAMPLE  AND  HOLD 
DELAY 

LOOP 

START  CONVERSION 

DELAY  FOR  EOC  PULSE  TO  FALL 

LOOP 

WAIT  FOR  END  OF  CONV 


READ  FFDATA 
MASK  FOR  EOC  BIT 
WAIT 

WAIT  FOR  OPTO  ISOLATORS 
TO  SETTLE 

LOOP 

READ  CONVERTER  DATA 
POINT  TO  NORM  DATA 
CLEAR  B 
CLEAR  MS  BYTE 


LOAD  DATA 


. 


. 
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1555 

23 

IN  X 

H 

1556 

70 

MOV 

M,B 

1557 

23 

INX 

H 

1558 

70 

MOV 

M,B 

LOAD 

LS  BYTE 

1559 

23 

INX 

H 

155A 

3607 

MVI 

M,  07H 

LOAD 

EXPONENT ,  7D 

155C 

AF 

XR  A 

A 

CLEAR 

A,  SIGN  FLAG 

155D 

322220 

STA 

SIGNF 

1560 

CD0C04 

CALL 

NRMFA 

NORMALIZE 

1563 

21 1C20 

L  XI 

H , FP V 1 1 

LOAD 

MULTIPLICAND 

1566 

3652 

MVI 

M ,  52H 

LOAD 

El NARY  10.3  D 

1568 

23 

INX 

H 

1569 

3666 

MVI 

M  ,66H 

156B 

23 

INX 

H 

156C 

3604 

MVI 

M,04H 

156E 

CD0004 

CALL 

.  MULFA 

MULTIPLY 

1571 

01  1F20 

LXI 

B , FP V21 

LOAD 

RESULT  TO  MEM 

1574 

115320 

LXI 

D, MEM09 

1577 

2603 

MVI 

H,  03H 

1579 

CD4F00 

CALL 

,  BKMFA 

MOVE 

157C 

C9 

RET 

EXIT 

END 


, 

B30221 


